Hi !
I'm trying to get all the date values for the week (7days) ahead of a
specified date.
To get the current date I use :
my ($d, $m, $y) = (localtime)[3,4,5];
my $date = sprintf("%02d-%02d-%02d",
$d, $m+1, $y-100);
To get the date of the date 7 days ahead I use:
my ($da, $ma, $ya) = (localtime (time+
(7*24*60*60)))[3,4,5];
my $next_date =
sprintf("%02d-%02d-%02d", $da, $ma+1, $ya-100);
Now I would like to get all the dates between $date and $next_date to
print out information for each day.
Does anyone know a simpler way than calculating each day individually?
Thanks for your tips in advance.
Sven
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
