opendir (ORDNER, "$dirpath") or die "SOMETHING WRONG: $!";
my @FILES = sort grep(!/^.{1,2}$/, readdir(ORDNER));
closedir (ORDNER);Leider geht das bei mir nicht, weder lokal auf IIS noch online. Selbst wenn ich den Pfad explizit angebe, das aufgelistete Verzeichnis ist immer mein cg-bin ordner und nicht der ordner des angegebenen pfades.
Kann es sein, dass du noch den Code den du im Orginalposting gezeigt hast nutzt?
opendir(DH, $verzeichnis) or die "$verzeichnis: $!";
my @liste = grep { ! -d } readdir DH;
closedir DH;
# stl filtern
@liste = glob "*.stl";
my $gefunden = @liste;
Du liest durch das glob explizit den aktuellen Pfad und überschreibst die richtigen Werte, die du mit opendir eingelesen hast.
Struppi.