.htaccess und .htpasswd nicht einlesen oder nicht ausgeben

[meggamoon]

Ich habe es so probiert :

sub scan_dir {
my ($new_date,$last_date,$found,$scantype,@lines,@filename,@new_array);
opendir(HOMEDIR, "$base_dir") or die("$!");

erwäge dass das Directory nicht gelesen werden kann.

foreach ( readdir(HOMEDIR)  ){
   $_ =~ /^./ and next;
   # damit übergehe ich alles, was mit einem . beginnt, ergo .htaccess
   push( @filelist, $_);
}
closedir(HOMEDIR);

Jetzt scannt er leider gar nichts mehr ein ...
Irgendwo muß da noch der Wurm drin sein.

Gruß
meggamoon