Opened by Lightman at 2007-09-02 16:41
User since
2007-01-31
57 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2007-01-31
57 Artikel
BenutzerIn
Hallo,
in einem Ordner sind Unterordner enthalten, in denen Text-Dateien gespeichert sind. Ich möchte per File::Find die Text-Dateien einlesen und nach Datum sortieren.
Mein Code bis jetzt:
Wie lege ich fest, dass die Such-Tiefe nur 1 beträgt, d.h. dass Ordner in den Unterordnern bei der Suche ignoriert werden?
in einem Ordner sind Unterordner enthalten, in denen Text-Dateien gespeichert sind. Ich möchte per File::Find die Text-Dateien einlesen und nach Datum sortieren.
Mein Code bis jetzt:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
my @ARGV = ("./data");
my @files = ();
# Gefundene Dateien hinzufügen...
find sub { push(@files, $_) }, @ARGV;
# Dateien nach Datum sortieren...
foreach my $file (sort sub { (stat($a))[9] <=> (stat($b))[9] }, @files) {
print "$file\n";
}Wie lege ich fest, dass die Such-Tiefe nur 1 beträgt, d.h. dass Ordner in den Unterordnern bei der Suche ignoriert werden?