Datum ... schon wieder ...

[Calocybe]

Hi!

Warum nicht einfach das

use Time::localtime;

weglassen, damit die eingebaute localtime-Funktion verwendet wird, und dann sowas wie das hier?

@MONTH_NAMES = ("Januar", "Februar", "März", "April", "Mai", "Juni",
        "Juli", "August", "September", "Oktober", "November","Dezember");

($sec, $min, $hour, $mday, $monthindex, $year, $wday, $yday, $isdst) = localtime(time);

$month = $monthindex + 1;
    $shortyear = $year % 100;
    $year += 1900;

for ($sec, $min, $hour, $month, $mday, $shortyear) {
        ($_ < 10) and $_ = "0$_";
    }

$date = "$mday.$month.$shortyear $hour:$min:$sec";
    $long_date = "$mday. $MONTH_NAMES[$monthindex] $year, $hour:$min:$sec";

Calocybe