Sorry, doch wie mach ich das jetzt mit den 2 Stunden ??
Irgendwie hilft mir das nicht so ganz...
Hilft das vielleicht?
############################################
Funktion: Änderungsdatum einer Datei
############################################
Parameter: $1 = Pfadname
sub modified ($)
{
# Parameterwerte zuweisen
my ($dateiname) = @_;
# Änderungdatum der Datei beschaffen
my @stats = stat ($dateiname);
my $file_mod_time = @stats[9]; # Sekunden nach 'epoch' (1.1.1970)
# Ergebnis zurückliefern
return $file_mod_time;
}