das änderungsdatum einer datei bekommst du mit my $mtime = (stat $filename)[9];