Procházet zdrojové kódy

Update iso8601 script to not fail, oops.

cray
Mitch Tishmack před 11 roky
rodič
revize
cf0b646253
1 změnil soubory, kde provedl 2 přidání a 3 odebrání
  1. +2
    -3
      common/bin/iso8601

+ 2
- 3
common/bin/iso8601 Zobrazit soubor

@@ -5,9 +5,8 @@ use warnings;
use POSIX qw(strftime);

my $now = time;
my $local_now = localtime $now;
my $tz = strftime '%z', $local_now;
my $tz = strftime(('%z', (localtime $now)));
$tz =~ s/(\d{2})(\d{2})/$1:$2/smx;
my $time = strftime '%Y-%m-%dT%H:%M:%S', $local_now;
my $time = strftime('%Y-%m-%dT%H:%M:%S', (localtime $now));
print "$time$tz\n";
exit 0;

Načítá se…
Zrušit
Uložit