Hi, tried your code here getting this:

Software error:
ERROR: Date::Manip unable to determine Time Zone.
 at C:/Perl/site/lib/Date/Manip.pm line 3645
    Date::Manip::Date_TimeZone called at C:/Perl/site/lib/Date/Manip.p
+m line 684
    Date::Manip::Date_Init() called at C:/Perl/site/lib/Date/Manip.pm 
+line 1454
[download]