Subject: | timelocal should be called with 4-digit year |
man Time::Local says
Whenever possible, use an absolute four digit year instead.
With a detailed explanation about ambiguity of 2-digit years above that.
Please review/test/merge the attached patch (not tested)
Index: File-Listing-6.04/lib/File/Listing.pm
===================================================================
--- File-Listing-6.04.orig/lib/File/Listing.pm
+++ File-Listing-6.04/lib/File/Listing.pm
@@ -332 +332 @@ sub line {
- my $filetime = Time::Local::timelocal(0,$M,$H,$d,$m-1,_guess_year($y)-1900);
+ my $filetime = Time::Local::timelocal(0,$M,$H,$d,$m-1,_guess_year($y));