> perl -MTime::Piece -wE "say $Time::Piece::VERSION; my $t=Time::Piece->strptime('05/10/1969','%m/%d/%Y'); say $t->ymd; say $t->strftime('%Y-%m-%d')" 1.20_01 1969-05-10 1969-05-10