Opened by BrownWolf at 2003-10-16 20:39
User since
2003-08-04
2036 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
2036 Artikel
BenutzerIn
Hi!
Du kannst auch folgendes benuetzen!
Funzt aber nur bis zu einem Verzeichnis! Das heisst wenn du ein Unterverzeichnis und darin noch ein Verzeichnis hast, wird dieses nicht angezeigt!
Gruss\n\n
<!--EDIT|havi|1066331126-->
Du kannst auch folgendes benuetzen!
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/bin/perl
use warnings;
use strict;
my $Verzeichnis = "d:\\test";
opendir(DIR, $Verzeichnis) or die $!;
my @array = readdir(DIR);
closedir(DIR) or die $!;
print join("\n", @array);
1;
Funzt aber nur bis zu einem Verzeichnis! Das heisst wenn du ein Unterverzeichnis und darin noch ein Verzeichnis hast, wird dieses nicht angezeigt!
Gruss\n\n
<!--EDIT|havi|1066331126-->