perl> print UnixDate( '2:46:40am, September 9, 2001.', '%s')
1000000000
 perl>