Thread Dateien im verzeichnis der reihe nach abarbeiten (10 answers)
Opened by Marc at 2011-04-05 07:51

rosti
 2011-04-05 08:49
#147376 #147376
User since
2011-03-19
3472 Artikel
BenutzerIn
[Homepage]
user image
Moin,

zum Einlesen der Dir gibt es verschiedene Möglichkeiten, siehe File.pm. Ziel: die Dateien kommen auf eine Liste, die dann sortiert werden kann:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10

my @files = qw(3_xy.txt 10_foo.txt 2_bar.txt 1_foobar.txt);

@files =
        map  { $_->[0] }
        sort { $b->[0] <=> $a->[0] }
        map  { [split(/_/, $_)]  } @files;

foreach my $file (@files){
        print "$file\n";
}


Das Sortierkriterium ist hier ein numerischer Wert vor dem "_" im Dateinamen. Ein split(/_/, $dateiname) liefert diesen Wert in [0] und danach wird in der Schwartzschen Transformation sortiert.

Rolf

View full thread Dateien im verzeichnis der reihe nach abarbeiten