Help for this page

Select Code to Download

Select or download this

$ perl -E '$s="2 0 1 2 - 7 - 2 7  9 : 3 7 : 3 1"; $s =~ s/\s\s?(\S)/$1
+/g; say $s'
2012-7-279:37:31

$ perl -E '$s="2 0 1 2 - 7 - 2 7  9 : 3 7 : 3 1"; $s =~ s/\s(\S)/$1/g;
+ say $s'
2012-7-27 9:37:31