Antwort: | Einfach folgenden Code einfügen:
$Jetztwert = time(); $Jetztzeit = localtime($Jetztwert); &Deutschnamen; @Zeit = split(/ +/,$Jetztzeit);
out "Heute ist ",$Zeit[0],", der ",$Zeit[2],". ",$Zeit[1]," ",$Zeit[4]; sub Deutschnamen { $Jetztzeit =~ s/Mon/Montag/; $Jetztzeit =~ s/Tue/Dienstag/; $Jetztzeit =~ s/Wed/Mittwoch/; $Jetztzeit =~ s/Thu/Donnerstag/; $Jetztzeit =~ s/Fri/Freitag/; $Jetztzeit =~ s/Sat/Samstag/; $Jetztzeit =~ s/Sun/Sonntag/; $Jetztzeit =~ s/Jan/Januar/; $Jetztzeit =~ s/Feb/Februar/; $Jetztzeit =~ s/Mar/Maerz/; $Jetztzeit =~ s/Apr/April/; $Jetztzeit =~ s/May/Mai/; $Jetztzeit =~ s/Jun/Juni/; $Jetztzeit =~ s/Jul/Juli/; $Jetztzeit =~ s/Aug/August/; $Jetztzeit =~ s/Sep/September/; $Jetztzeit =~ s/Oct/Oktober/; $Jetztzeit =~ s/Nov/November/; $Jetztzeit =~ s/Dec/Dezember/;
}
|