the next day's date

[Anonymous Monk]

Is there a perl routine that will get the next day's
date? For example; if today is 8/7/2002 how could I
get 8/8/2002? Even if the date is 8/31/2002, how
could i get 9/1/2002? thanks in advance

[dws]

Is there a perl routine that will get the next day's date?

If you don't mind to narrow little 1 hour windows when daylight savings time transitions will give you the wrong answer (in terms of absolute time, but not date), you can do $tomorrow = time() + 24*60*60; and then use localtime() to pick $tomorrow apart into pieces. Or, you can check out Date::Manip.

[mfriedman]

Or, simply,

localtime(time + 86400)

[RMGir]

I'll second the recommendation for Date::Manip; it will even let you "Date_GetNextWorkDay", letting you specify the holidays that apply in your context.
--
Mike

[Anonymous Monk]

sub next_day {
    sleep 86400;
    return localtime();
}

[Abigail-II]

But then you have to wait a day. It can be optimized:

    sub next_day {
        sleep  24 * 60 * 60;
        my $date = localtime;
        sleep -24 * 60 * 60;
        return $date;
    }

Abigail

[tadman]

You can use Date::Calc of course (or Date::Manip).

I'm almost in agreement with dws, except that time is a concept that is ethreal at best. If you're in a region plagued by "daylight savings time", then this may not work during that small window where a day has only 23 hours, or perhaps 25. It's like changing time-zones even though you're sitting still.

[Abigail-II]

   $ perl -MDate::Manip -wle 'print UnixDate ParseDate ("tomorrow") =>
+ "%u"'
   Fri Aug  9 11:48:57 +0200 2002
   $

Abigail