Verzeichnis nach Zeitstempel sortieren, dann auslesen (gelöst) (Allgemeines zu Perl)

[thread]17378[/thread]

Verzeichnis nach Zeitstempel sortieren, dann auslesen [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 24

Articles: hide open all | hide show old branches

+4 replies
laplace

2012-05-02 20:18

User since
2011-10-09
21 Artikel
BenutzerIn

Hallo!

Ich bräuchte Hilfe zur folgenden Fragestellung:
Es soll der Inhalt eines Verzeichnisses ausgelesen werden, wobei es sich beim Inhalt um diverse Textdateien handelt.
Meine Frage ist wie die diese Files im allgemeinen geordnet sind?! ich denke mal alphabetisch?! kann man eine Anordnung nach Erstellungsdatum flott erzwingen, bevor man die Daten mit readdir (...) zeilenweise abarbeitet?

Danke für die Rückmeldung
- topeg
  
  2012-05-02 20:35
  User since
  2006-07-10
  2611 Artikel
  BenutzerIn
  Man kann nicht im Dateisystem Sortieren. Auch wenn es im weiteren Sinn eine Datenbank ist. Die Reihenfolge von Dateien in einem Ordner ist nicht festgelegt.
  Du musst alle DateiNamen einlesen und diese dann sortieren (ungetestet):
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11
  
  my $dir='/irgendwo/im/dateisystem'; opendir(my $dh, $dir) or die("Error open $dir $!\n"); my @files=grep{-f "$dir/$_"}readdir($dh); closedir($dh); # Schwarzsche Transformation # name -> [mdate,name] -> sort() -> name @files=map{$_->[1]}sort{$a->[0] <=> $b->[0]}map{[-M "$dir/$_",$_]}@files; for my $file (@files) { # mach was mit den sortierten Namen. }
  
  Auch bei sehr vielen DateiNamen sollte das kein Problem darstellen.
  Last edited: 2012-05-02 20:36:36 +0200 (CEST)
- +2 replies
- Gast rb999
  
  2012-05-02 22:36
  
  Hallo,
  
  die Art der Aufzeichnung ist vom Filesystem abhängig.
  
  Grundsätzlich stehen im Verzeichnis - nur - die Dateinamen und, daran angehängt, ein Zeiger auf die Dateibeschreibung.
  Das Verzeichnis enthält die Dateinamen in der Reihenfolge der Aufzeichnung.
  
  Die wichtigsten Daten aus der Dateibeschreibung werden mit der Funktion stat gelesen. Beschreibung dazu unter
  
  perldoc perlfunc
  
  Also Reihenfolge:
  
  1. readdir
  2. stat
  3. sort nach dem gewünschten Kriterium
  Last edited: 2012-05-02 22:39:15 +0200 (CEST)
  - laplace
    
    2012-05-21 23:04
    
    User since
    2011-10-09
    21 Artikel
    BenutzerIn
    
    Danke; hat mir alles weiter geholfen;
    Ist zwar aufwendiger als gedacht, doch relativ schnell umsetzbar.

View all threads created 2012-05-02 20:18.