use Date::Manip; my $date_1="Aug 26 23:10:59"; my $date_2="Aug 27 10:59:02"; my $sec = Delta_Format(DateCalc($date_1, $date_2), 0, "%st"); printf "diff secs: %d\n", $sec;