Skip Menu |

This queue is for tickets about the Date-Tie CPAN distribution.

Report information
The Basics
Id: 42028
Status: resolved
Priority: 0/
Queue: Date-Tie

People
Owner: FGLOCK [...] cpan.org
Requestors: martin.labonte [...] sympatico.ca
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Version 0.18 stoped working on December 28, version 0.17 still working
Date: Mon, 29 Dec 2008 16:48:09 -0500
To: <bug-Date-Tie [...] rt.cpan.org>
From: Martin Labonté <martin.labonte [...] sympatico.ca>
Hello, My servers that were using Date-Tie version 0.18 stopped to work on December 28. Everything is fine when using version 0.17. I will send another email if I get a better idea of the problem. # A short example - No bug if local time set to be before dec 28 GMT use Date::Tie; Date::Tie->new('year'=>2009, 'month'=>1, 'day'=>1); # this line crashes =============== Regards, Martin Labonté
RT-Send-CC: datetime [...] perl.org
2008/12/29 Martin Labonté via RT <bug-Date-Tie@rt.cpan.org>: Show quoted text
> > Hello, > > My servers that were using Date-Tie version 0.18 stopped to work on
December Show quoted text
> 28. Everything is fine when using version 0.17. I will send another
email if Show quoted text
> I get a better idea of the problem. > > # A short example - No bug if local time set to be before dec 28 GMT > > use Date::Tie; > Date::Tie->new('year'=>2009, 'month'=>1, 'day'=>1); # this line crashes > > =============== > > Regards, > > Martin Labonté >
- I've got these Time::Local error messages in Date::Tie 0.18: $ make test cp lib/Date/Tie.pm blib/lib/Date/Tie.pm PERL_DL_NONLAZY=1 /opt/local/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t t/frac........ok t/more........Day too big - 25200 > 24855 Sec too small - 25200 < 74752 Sec too big - 25200 > 11647 t/more........ok t/overflow....ok t/tie.........Day too big - 25200 > 24855 Sec too small - 25200 < 74752 Sec too big - 25200 > 11647 t/tie.........ok t/timezone....Day too big - 25200 > 24855 Sec too small - 25200 < 74752 Sec too big - 25200 > 11647 t/timezone....ok All tests successful. Files=5, Tests=101, 0 wallclock secs ( 0.03 usr 0.02 sys + 0.18 cusr 0.05 csys = 0.28 CPU) Result: PASS - Upgrading Time::Local to 1.1901 fixes the tests. Flávio S. Glock
Subject: [rt.cpan.org #42028] Version 0.18 stop to work on last week of every year
Date: Mon, 5 Jan 2009 20:54:28 -0500
To: <bug-Date-Tie [...] rt.cpan.org>
From: Martin Labonté <martin.labonte [...] sympatico.ca>
Hello, Since we are in begining of 2009, we must change the local time (GMT) of the PC to one day in the last week of a year to reproduce the bug. So, this bug will happen each end of year for a few days if not resolved. The date assigned to a Date-Tie object must be in futur relatively to the local time. I am using : - ActivePerl v5.8.7 under WinXP - Date-Tie 0.18 - Time-Local 1.1901 Error Output is : 'Cannot handle date (0, 0, 0, 31, 11, 1899) at c:/Perl/site/lib/Date/Tie.pm line 351' Regards, Martin Labonté
Subject: Re: [rt.cpan.org #42028] Version 0.18 stop to work on last week of every year
Date: Wed, 7 Jan 2009 17:12:11 +0100
To: bug-Date-Tie [...] rt.cpan.org
From: "Flavio S. Glock" <fglock [...] gmail.com>
2009/1/6 Martin Labonté via RT <bug-Date-Tie@rt.cpan.org>: Show quoted text
> > Since we are in begining of 2009, we must change the local time (GMT) of the > PC to one day in the last week of a year to reproduce the bug. So, this bug > will happen each end of year for a few days if not resolved. The date > assigned to a Date-Tie object must be in futur relatively to the local time. > > I am using : > - ActivePerl v5.8.7 under WinXP > - Date-Tie 0.18 > - Time-Local 1.1901 > > Error Output is : 'Cannot handle date (0, 0, 0, 31, 11, 1899) at > c:/Perl/site/lib/Date/Tie.pm line 351'
The 'Time::Fake' module might help you debugging: $ perl -Ilib -e ' use Date::Tie; tie my %date, 'Date::Tie'; print " $date{weekyear} \n" ' 2009 $ perl -MTime::Fake='-10d' -Ilib -e ' use Date::Tie; tie my %date, 'Date::Tie'; print " $date{weekyear} \n" ' 2008 Unfortunately, I can't reproduce the problem. Would you provide a small test case?
Subject: Re: [rt.cpan.org #42028] Version 0.18 stop to work on last week of every year
Date: Wed, 7 Jan 2009 21:38:16 -0500
To: <bug-Date-Tie [...] rt.cpan.org>
From: Martin Labonté <martin.labonte [...] sympatico.ca>
Hello, Show quoted text
> Unfortunately, I can't reproduce the problem. > Would you provide a small test case?
I tried your test case at 14h00 and it was working. I tried a second time at 20h00 and it was failing. This test case is failing for me: perl -Ilib -e "use Time::Fake '1230600000'; use Date::Tie; tie my %date, 'Date::Tie'; print $date{weekyear};" Cannot handle date (0, 0, 0, 31, 11, 1899) at c:/Perl/site/lib/Date/Tie.pm line 351 If this one doesn't fail, I will have to consider that the problem could come from the ActivePerl distribution. Thanks!
Subject: Re: [rt.cpan.org #42028] Version 0.18 stop to work on last week of every year
Date: Thu, 8 Jan 2009 11:29:10 +0100
To: bug-Date-Tie [...] rt.cpan.org
From: "Flavio S. Glock" <fglock [...] gmail.com>
2009/1/8 Martin Labonté via RT <bug-Date-Tie@rt.cpan.org>: Show quoted text
> perl -Ilib -e "use Time::Fake '1230600000'; use Date::Tie; tie my %date, > 'Date::Tie'; print $date{weekyear};" > > Cannot handle date (0, 0, 0, 31, 11, 1899) at c:/Perl/site/lib/Date/Tie.pm > line 351 > > If this one doesn't fail, I will have to consider that the problem could > come from the ActivePerl distribution.
I tried this with a few different versions of Perl, without problems. I can't test with ActivePerl at the moment, though.
fixed in Date-Tie 0.19