Help for this page
my $t1 = "2009-04-12 23:59:55 PM"; my $t2 = "2009-03-30 00:00:02 PM";
use Time::Local; ... my $t2 = "2009-03-30 00:00:02 PM"; print &String2Time($t1) - &String2Time($t2);