You might want to try out the Date::Manip package. It has a function 

&Date_Cmp which compares any two dates. You first read the date through the
function &ParseDate in the module, and then compare the dates through
&Date_Cmp. 

HTH, 
-tir

-- 
 Tirthankar, IGIDR. 
 +91-22-8400919 x275 (r), x593(o), x542(CFL). 
 http://www.igidr.ac.in/~tir

  RECONCILIATION, n.  A suspension of hostilities.  An armed truce for
  the purpose of digging up the dead.

On Wed, 6 Mar 2002, Dittrich G. Michael wrote:

> I try to find a quick and uncomplicated way to calculate the difference between one 
>and another date/time:
> 
> @date1 = ($year1, $month1, $day1, $hour1, $minute1);
> @date2 = ($year2, $month2, $day2, $hour2, $minute2);
> 
> @deltaDateTime = "difference"(@date1, @date2);
> 
> print "@deltaDateTime\n";
> 0 0 0 12 35
> 
> anyone any suggesting for a quick way ...and covering issues like 28Feb  30/31 
>month-length ...
> 
> (perl 5.005_3 on FreeBSD)
> 
> thanks in advanced
> 
> 
> Michael G. Dittrich
> 
> --
> berlin.de - meine stadt im netz. Jetzt eigene eMail-adresse @berlin.de sichern!
> http://www.berlin.de/home/MeineStadt/Anmeldung
> 
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> 
> 




-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to