in reply to DateTime and hour 0
I can't replicate the problem here. How about simplifying the algorithm instead?
sub minutes_before { my $minutes_b4=shift; my $month=shift; my $day=shift; my $hour=shift; my $minute=shift; # Lets find n minutes before! my $datetime=DateTime->new( year => 2005, month => month_to_num($month), day => $day, hour => $hour, minute => $minute, second => 00 ); $datetime->subtract( minutes => $minutes_b4 ); $ready=1; return @MINBEFORE = ( num_to_month( $datetime->month ), $datetime->day, $datetime->hour, $datetime->minute ); }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: DateTime and hour 0
by tcf03 (Deacon) on Apr 18, 2005 at 15:51 UTC | |
by Mr. Muskrat (Canon) on Apr 19, 2005 at 11:28 UTC |
In Section
Seekers of Perl Wisdom