$now = time; # get current time in seconds since epoch
$then = $now - (30*24*60*60); # subtract 30 days worth of seconds
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($then);
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
Steve Reule
Sent: Thursday, October 05, 2000 2:33 PM
To: [EMAIL PROTECTED]
Subject: 30 days before
Thanks to the people who responded to my question from last week. Now I have
another one, please, if I may....
Is there an easy way to get a date, say 30 days in the past? I have the
current date and want to automatically calculate a date 30 days ago. It has
to span multiple years as well.
Thanks in advance...
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
