Pārlūkot izejas kodu

Use ISO8601 instead of raw timestamps

Zachary Kotlarek 9 gadi atpakaļ
vecāks
revīzija
5998bc27a8
1 mainītis faili ar 3 papildinājumiem un 2 dzēšanām
  1. 3 2
      dmx/DMX.pm

+ 3 - 2
dmx/DMX.pm

@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 use strict;
 use warnings;
-use POSIX;
+use POSIX qw(strftime);
 use File::Temp;
 use IO::Select;
 use IO::Socket::UNIX;
@@ -153,7 +153,8 @@ sub parseState($$$) {
 	if ($DEBUG) {
 		my @exists_tmp = ();
 		foreach my $key (sort(keys(%{$exists}))) {
-			push(@exists_tmp, $key . ":\t" . $exists->{$key} . ' @ ' . $mtime->{$key});
+			push(@exists_tmp,
+				$key . ":\t" . $exists->{$key} . ' @ ' . POSIX::strftime('%Y-%m-%d %H:%M:%S', localtime($mtime->{$key})));
 		}
 		print STDERR 'Got state: ' . $cmdState . "\n" . join("\n", @exists_tmp) . "\n";
 	}