Bug #62189 for Time-Piece: truncate method

Sat Oct 16 03:35:05 2010 ifomichev [...] cpan.org - Ticket created

Subject:

truncate method

Thank you for a great module. The only thing I really miss in it is a truncate method, similar to the one that DateTime has. my $dt = Time::Piece->gmtime; my $midnight = $dt->truncate(to => 'day'); # or whatever

Sat Oct 16 07:36:29 2010 ifomichev [...] cpan.org - Correspondence added

I wrote a monkey patch, that is sufficient to me. If you're interested to add this functionality , I would be glad to make a patch and write tests for the distribution. ---- #!/usr/bin/perl use strict; use warnings; use Time::Piece; local *Time::Piece::truncate; *Time::Piece::truncate = sub { package Time::Piece; my ($time, $to) = @_; return $time->_mktime([(0) x $to, @$time[$to..c_isdst]], $time-> [c_islocal]); }; my $now = Time::Piece->gmtime; my $midnight = $now->truncate(Time::Piece::c_mday); print $midnight, "\n";

Sat Oct 16 07:36:29 2010 ifomichev [...] cpan.org - Status changed from 'new' to 'open'

Mon Oct 18 10:44:47 2010 ifomichev [...] cpan.org - Correspondence added

Hmm... Sorry, I've found a bug :) local *Time::Piece::truncate; *Time::Piece::truncate = sub { package Time::Piece; my ($time, $to) = @_; my @t = (0, 0, 0, 1, 0); return $time->_mktime([@t[0..$to-1], @$time[$to..c_isdst]], $time-> [c_islocal]); };

Tue Dec 03 21:45:13 2013 rjbs [...] cpan.org - Correspondence added

On 2010-10-18 10:44:47, IFOMICHEV wrote: Show quoted text

> Hmm... Sorry, I've found a bug :) > > local *Time::Piece::truncate; > *Time::Piece::truncate = sub { > package Time::Piece; > my ($time, $to) = @_; > my @t = (0, 0, 0, 1, 0); > return $time->_mktime([@t[0..$to-1], @$time[$to..c_isdst]], $time-> > [c_islocal]); > };

A patch in the form originally described (to => 'days') would be welcome. -- rjbs

Mon Oct 03 12:23:51 2016 HOUSTON [...] cpan.org - Correspondence added

I've put a PR together to implement this. See https://github.com/rjbs/Time-Piece/pull/25

Mon Jun 19 16:31:19 2017 ESAYM [...] cpan.org - Status changed from 'open' to 'resolved'

Mon Jun 19 16:31:20 2017 ESAYM [...] cpan.org - Fixed in 1.31_04 added