Re: Yesterday's date

[fliptop]

Troy May wrote:

> What's the easiest way to get yesterday's date from localtime?  I need it in
> this format:  (for today) "070402".


use Date::Calc qw{ Today Add_Delta_Days };
my @date = Add_Delta_Days(Today, -1);
printf "Yesterday: %02u%02u%02u",
        $date[2], $date[1], substr($date[0], -2);


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]