Halt, Medung zurück, das steht drin:
#!/usr/bin/perl
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$year = $year+1900;
if ($min < 10) {
$min = "0$min";
}
if ($hour < 10) {
$hour = "0$hour";
}
@tag = ("Sonntag","Montag","Dienstag","Mittwoch","Donnerstag","Freitag","Samstag");
@monat = ("Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
print "Content-type: text/html\n\n";
print "$tag[$wday], der $mday. $monat[$mon] $year";
_____________________________________________________
Hab mich grad vertan. Anmerkung an HDS.CH - wann kommen endlich die Cookies, dass man sich nicht jedesmal einloggen muss / die Favoriten benutzen muss. Wäre ganz geschickt, gerade dann, wenn man - so wie ich - einen Threat aus einer Antwortmail aus öffnet...
Gruß Andreas
(Dieser Beitrag wurde von Hanü am 13. Aug 2004, 13:52 geändert)