Select Code to Download

#! perl -slw
use strict;
...
__END__
c:\test>junk57.pl
{ d => "06", h => 20, "m" => 10, mn => 55, "s" => 31, "y" => 2010 }

#! perl -slw
use strict;
...
__END__
c:\test>junk57.pl
2010, 10, 06, 20, 55, 31