Datumswerten zu berechnen. Inklusive Schaltjahresproblematik und dem ganzen Zeug, jaja.
Perl-Kochbuch:
=== cut ===
use Date::Calc qw(Delta_Days);
$days = Delta_Days($year1, $month1, $day1, $year2, $month2, $day2);
=== cut ===
Schöööön - jetzt müßte ich den Modul nur noch in ActivePerl5.005b509 finden ... ich mache erst mal die wichtigen Sachen weiter, bevor ich hier noch drei Zeilen Code sparen kann.