Opened by Gast at 2004-08-12 15:16
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
[quote=Guest,12.08.2004, 13:16]
es gibt 5 unterverzeichnisse mit folgendem namen:
hallo_001
hallo_002
hallo_003
hallo_003.alt
hallo_002.alt
ich möchte nur die ersten drei in einem array speichern der rest soll überlesen werden!
danke[/quote]
deine beschreibung ist zwar etwas vage, und ich kann nur raten:
aber vielleicht ist es ja genau das, was du suchst. ansonsten bitte ein
kriterium fürs aussortieren angeben.
es gibt 5 unterverzeichnisse mit folgendem namen:
hallo_001
hallo_002
hallo_003
hallo_003.alt
hallo_002.alt
ich möchte nur die ersten drei in einem array speichern der rest soll überlesen werden!
danke[/quote]
deine beschreibung ist zwar etwas vage, und ich kann nur raten:
Code: (dl
)
1
2
3
4
5
6
7
8
my @auswahl;
for my $dir (@subdirs) {
push @auswahl, $dir if $dir =~ m/^hallo_00\d$/;
# oder auch
push @auswahl, $dir unless $dir =~ m/\.alt$/;
}
# oder auch
my @auswahl = @dirs[0..2]; # du sagtest, die ersten 3
aber vielleicht ist es ja genau das, was du suchst. ansonsten bitte ein
kriterium fürs aussortieren angeben.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem