The name of the module is Time::Local, with the T and the L uppercase. Case is significant in module names. Fix that, and the code should work. You can test it with localtime:
#!perl -l
use Time::Local;
$sec = 1;
$min = 2;
$hours = 3;
$mday = 4;
$mon = 5;
$year = 6;
print $time = timelocal($sec,$min,$hours,$mday,$mon,$year);
print scalar localtime $time;
Which prints out:
1149404521
Sun Jun 4 03:02:01 2006
timelocal does some guessing on the year; it figured that 6 meant 2006. Also remember that the month starts at 0, so 5 is June. |