I didn't set it to 24 I tried 0 and 00, thats why the error seems odd to me. here is the beginning of the sub where this is located 
sub minutes_before
{
    my $minutes_b4=shift;
    my $month=shift;
    my $day=shift;
    my $hour=shift;
    my $minute=shift;

    my $MONTHNUM=&month_to_num($month);

    ( $day < 10 ) ? $FDAY="0$day" : $FDAY=$day;

    # Lets find n minutes before!
    $datetime=DateTime->new( year   => 2005,
                             month  => $MONTHNUM,
                             day    => $FDAY,
                             hour   => $hour,
                             minute => $minute,
                             second => 00 );
my $formatter=DateTime::Format::Epoch->new(
                      epoch              => $datetime,
                      unit               => 'seconds',
                      type               => 'int', # or 'float', or 'b
+igint'
                      skip_leap_seconds  => 1,
                      start_at           => 0,
                      local_epoch        => undef );

    my $seconds=$formatter->format_datetime($datetime);

    my $conv_seconds=$minutes_b4 * 60;
    $seconds=$seconds-$conv_seconds;

    # And we are left with n seconds before our search time
    my $MinBefore=$formatter->parse_datetime( $seconds );

    # Now we'll reformat $MinBefore to fit the log file
    my ($DATE2, $TIME2)=split(/T/, $MinBefore);
    ($YEAR2, $MONTH2, $DAY2)=split(/-/, $DATE2);

    $MONTHNAME2=&num_to_month($MONTH2);

    ($HOUR2, $MINUTE2, $SECOND2)=split(/:/, $TIME2);
    # End of reformatting $MinBefore

    $DAY2=~s/^0+//;
    $ready=1;
    return @MINBEFORE=($MONTHNAME2, $DAY2, $HOUR2, $MINUTE2);
}

[download]
and here is where $hour gets set: 
if ( defined (param('MONTH')) and
     defined (param('DAY'))   and
     defined (param('HOUR'))  and
     defined (param('MINUTE')) )
{
    $MONTH=param('MONTH');
    $DAY=param('DAY');
    $HOUR=param('HOUR');
    $MINUTE=param('MINUTE');

[download]
snip... 
@M1=&minutes_before(1, $MONTH, $DAY, $HOUR, $MINUTE);

[download]
The code works as its supposed to execept when I enter 0 or 00.
Thanks
Ted
update
$hour % 24 didn't work either.

In reply to Re^2: DateTime and hour 0 by tcf03
in thread DateTime and hour 0 by tcf03

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.