Jörk Behrends: Datum in Sekunden?

Beitrag lesen

Hi,

ich wuerde gerne zwei Daten miteinander vergleichen und wissen, welches von beiden aelter ist.

#--------
use Time::Local;

$date1 = timelocal ($sec1, $min1, $hours1, $mday1, $month1 -1, $year1 -1900);
$date2 = timelocal ($sec2, $min2, $hours2, $mday2, $month2 -1, $year2 -1900);

if ($date1 < $date2)
{
   ...
}

#----------------

Der Monatsparameter enthält Werte von 0-11. timelocal() ist die Umkehrfunktion zu localtime() ...

So, und um es wie Cheatah zu sagen:

perldoc Time::Local

Bzw. timothy würde aus dem Cookbbook/Kochbuch Kapitel 3.3 rezitieren ;-)

Viel Spaß weiterhin,
   Jörk