Hallo,
Warum nimmst Du nicht :
use Date::Manip;
$wkno=&Date_WeekOfYear($m,$d,$y,$first);$m,$d,$y sollte klar sein. $first gibt an, welcher mit welchem Tag die Woche beginnt. 1 steht hier für Montag. Der Rest steht in der Modul-Doku.
Grüße
Klaus
Dummsinn,
$day=&Date_DayOfWeek($m,$d,$y);
wäre die Funktion der Stunde ;-)
Grüße
Klaus