Help for this page
use warnings; ... $date = $t->strptime ($date, $tdf); print " => $date\n"; }
HH:MM:SSpm => '%H:%M:%S%P' POSIX: 11:39:52am garbage at end of string in strptime: am at /pro/lib/perl5/site_perl/5 +.20.0/x86_64-linux-thread-multi-ld/Time/Piece.pm line 469. Time::Piece: 11:39:52am => Thu Jan 1 11:39:52 1970