[foo@bar test]$ perl -de 1

Loading DB routines from perl5db.pl version 1.28
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(-e:1):   1
  DB<1> use Time::Local

  DB<2> $time = Time::Local::timelocal(0,0,13,26,8,2009)

  DB<3> x $time
0  1253962800