Das aktuelle Verzeichnis ermitteln - #126568 (Allgemeines zu Perl)

sid burn

2009-10-07 14:06

User since
2006-03-29
1520 Artikel
BenutzerIn

user image

Quote
Ich möchte ganz gerne anhand des Erstelldatums das neueste Verzeichniss ermitteln!

Welches Betriebssystem den? Unix ähnliche Betriebssysteme Speichern das erstelldatum gar nicht erst. Ich glaube nur Windows speichert das Erstelldatum. Ich würde eher über die "mtime" sprich Modification time gehen. Sprich wann die Datei das letzte mal bearbeitet wurde.

Code (perl): (dl )

use Path::Class;

my @files =
    sort { $b->stat->mtime <=> $a->stat->mtime }
    map  { file($_)                }
    grep { $_ ne '.' && $_ ne '..' }
    dir->open->read;

say "Neuste Datei: $files[0]";

Ansonsten hier ein Beispiel mit Path::Class das dir in @files die Dateien/Verzeichnisse des aktuellen verzeichnisses speichert, und nach Modification Time Sortiert. Und dann die neueste Datei ausgiebt.

EDIT: ".." wird auch übersprungen.
Last edited: 2009-10-07 14:12:35 +0200 (CEST)

Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de