just to second esskars hint:     perldoc -f localtime
will point you to a much smoother way of determining time and date.