You should really look at Date::Manip - all written in Perl and it calcs dates 6 ways to sunday.......
-----Original Message----- From: Michael C. Podlesny [mailto:[EMAIL PROTECTED]] Sent: Monday, August 26, 2002 7:50 PM To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Subject: Calculating date and time difference in PERL? > Here is my dillema. > > I need to calculate the time difference between two dates. > > So for example: > > $end_date='2002-08-30' > > ($current_second,$current_minute,$current_hour,$current_day,$current_month,$ > current_year,$wday,$yday,$isdst)=localtime(time); > if (length($current_minute)==1) {$current_minute='0'.$current_minute;} > $current_year=$current_year+1900; > $current_month=$current_month+1; > > $DateCreated=$current_year."-".$current_month."-".$current_day." > ".$current_hour.":".$current_minute.":".$current_second; > > $end_date='2002-08-30 08:30:30' > > I need to find out the difference between $DateCreated and $end_date in the > format: X days, Y minuts, Z seconds > > Any ideas? > _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
