$PFAD="../www/Skripte/generierteSeite/";
$datei = "$PFAD$datei";
@Info = stat($datei);
$konvertiertes_datum = &konvertiere_datum($Info[9]);

sub konvertiere_datum {
    $Seconds    =    $Info[9];
    $Seconds     =     shift; 
 
    @date = ( localtime($Seconds) )[0..5];
    $date[4]++; 
    $date[5] += 1900;

    foreach $d (@date[2..4]) {
        $d = sprintf("%02d", $d);
    }

    $date = join(".", @date[3,4,5]);
    return "$date";
}