use Time::Local;



$time = timelocal($sec, $min, $hours, $mday, $mon, $year);

$time = timegm($sec, $min, $hours, $mday, $mon, $year);

