Markus Pitha: Wann erkennt -d ein Verzeichnis?

Beitrag lesen

Hi,
ja, aber ich verstehe trotzdem nicht, warum das in meinem Fall so ist. Hier der Bsp. Code.

opendir(DIR, $dir) or die "Cant open dir :$!\n";
while (defined($_ =  readdir DIR))    {
push @dir, $_;
}
closedir DIR;
foreach(sort{$a cmp $b} @dir)    {
if (-d $_)  {  print "<span class="dir">$_/</span><br />\n";  }
else   { print "<span class="file">$_</span><br />\n"; }
}

In $dir steht ein Pfad, den man im CGI-Script eintippen kann.

Markus.

--
sh:( fo:| ch:? rl:( br:> n4:( ie:{ mo:) va:) de:] zu:) fl:( ss:| ls:] js:|