> Excellent summary of most methods at
> http://perlmeme.org/faqs/datetime/comparing_dates.html.
>
> Regards
>
> James Turnbull
Hi All,
I'm running through the example of Date::Calc on the site listed above.
When I plug in today's date as my birthday... it returns:
I am -31 days old.
I would have guessed "0" days old. Can someone pls explain this to me?
(localtime)[5,4,3] stands for [$year, $mon, $mday] correct?
#!/usr/bin/perl
use strict;
use warnings;
use Date::Calc qw(Delta_Days);
my @today = (localtime)[5,4,3];
$today[0] += 1900;
my @birthday = (2006, 4, 6);
my $days = Delta_Days(@birthday, @today);
print "I am $days days old\n";
exit 0;
Thank you!
Brian Volk
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
