Use Time::Local module.try out this code:

use Time::Local;
$TIME = timelocal($sec, $min, $hours, $mday, $mon, $year);
[download]