Bug #32375 for Time-Fake: DateTime always gets epoch of '1'

Thu Jan 17 07:29:31 2008 ash_rtcpan [...] firemirror.com - Ticket created

Subject:

DateTime always gets epoch of '1'

$ perl -MTime::Fake='+2d' -e 'require DateTime; print time, " ", DateTime- Show quoted text

>from_epoch(epoch => time)->epoch,"\n"'

1200745458 1 I'm not quite sure whats happening there... But it also does weird things even if Time::Fake is just loaded $ perl -MTime::Fake -e 'require DateTime; print DateTime->from_epoch(epoch => 1200745458)->epoch,"\n"' 1 $ perl -e 'require DateTime; print DateTime->from_epoch(epoch => 1200745458)- Show quoted text

>epoch,"\n"'

1200745458 Shame this doesn't work, cos otherwise its a very useful looking module.

Thu Jan 17 10:25:31 2008 ash_rtcpan [...] firemirror.com - Correspondence added

Okay i found the problem: DB<8> x scalar CORE::gmtime 0 'Thu Jan 17 12:38:10 2008' DB<9> x scalar CORE::gmtime(1200746256) 0 'Sat Jan 19 12:37:36 2008' DB<10> x scalar CORE::gmtime(@_) 0 'Thu Jan 1 00:00:01 1970' DB<11> x scalar CORE::gmtime($_[0]) 0 'Sat Jan 19 12:37:36 2008' DB<12> p scalar @_ 1 DB<13> x @_ 0 1200746256 DB<14> push @_, 2; DB<15> x @_ 0 1200746256 1 2 DB<16> x scalar CORE::gmtime(@_) 0 'Thu Jan 1 00:00:02 1970' CORE::gmtime has a prototype of ($) Which forces @_ into scalar context. The CORE::GLOBAL::gmtime needs to be -rewritten as: *CORE::GLOBAL::gmtime = sub(;$) { @_ ? CORE::gmtime($_[0]) : CORE::gmtime(CORE::time() + $OFFSET); }; I imagine localtime will also suffer from similar problems.

Thu Jan 17 10:25:46 2008 The RT System itself - Status changed from 'new' to 'open'

Thu Jan 17 10:58:08 2008 ROSULEK [...] cpan.org - Status changed from 'open' to 'resolved'

Thu Jan 17 10:59:16 2008 ROSULEK [...] cpan.org - Correspondence added

Thanks a lot for spotting that problem and also tracking it down. A bugfix version 0.11 has been uploaded and will be visible soon.

Thu Jan 17 10:59:21 2008 The RT System itself - Status changed from 'resolved' to 'open'

Thu Jan 17 11:00:17 2008 ROSULEK [...] cpan.org - Status changed from 'open' to 'resolved'