use Time::Local;
$now = time();
$specific_time = timelocal($seconds, $minutes, $hour, $month_day, $month, $year);