You can get the current time with the time() function. YOu can generate a specific time value with Time::Local

use Time::Local;
$now = time();
$specific_time = timelocal($seconds, $minutes, $hour, $month_day, $mon
+th, $year);
[download]

$now and $specific_time are both represented as seconds since midnight jan 1, 1970. use localtime() to extract the seoncs, minues, hours etc from this.