[v9_9] bugfix in contrib/check5011.pl

This commit is contained in:
Evan Hunt 2013-04-16 13:36:07 -07:00
parent 1b4f89fdc0
commit 39210f43d3

View file

@ -9,7 +9,7 @@ my $now = strftime "%Y%m%d%H%M%S", gmtime;
sub ext8601 ($) {
my $d = shift;
$d =~ s{(....)(..)(..)(..)(..)(..)}
{$1-$2-$3.$4:$5:$6};
{$1-$2-$3.$4:$5:$6+0000};
return $d;
}