David Greenberg wrote:
[EMAIL PROTECTED] wrote:
If I wanted to subtract 1 from a date on the 1st of any month
what module will reflect the correct date?  For example, system
time is 09.01.04 and I want data from 08.31.04, I would have to
subtract 1 day.  Which module do I need to install?

Date::Manip from CPAN

Hmm.. Pretty disputable advice for such a trivial thing, don't you think?

From the Date::Manip POD:
"If you look in CPAN, you'll find that there are a number of Date and
Time packages. Is Date::Manip the one you should be using? In my
opinion, the answer is no most of the time. ... Date::Manip is written
entirely in perl. It's the most powerful of the date modules. It's
also the biggest and slowest."

Personally I don't know which of all the date related modules that
would fit best, but I'm sure other do. I for one wouldn't use any
module:

    my $time = time;

    sub mydate  {
        my $days = (shift or 0);
        my ($d, $m, $y) = (localtime($time - $days * 86400))[3..5];
        sprintf '%02d.%02d.%02d', $m + 1, $d, $y % 100;
    }

    print 'Today: ', mydate(), "\n";
    print 'Yesterday: ', mydate(1), "\n";

--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>




Reply via email to