.htaccess und .htpasswd nicht einlesen oder nicht ausgeben

[meggamoon]

Ich habe es jetzt so versucht :

$scantype = ($FORM{'type'} eq "all") ? '.' : '.'.$FORM{'type'};
foreach $new_line (@filename) {
 next if ($new_line eq '.' || $new_line eq '..');
 next if ($new_line !~ /.*($scantype)$/ );
 next if ($new_line ~ /^.ht/ );
 foreach $test_line (@lines)  {
  ($file_id,$stub) = split(/|/,$test_line,2);
  if ($new_line eq $file_id) {
   $found =1;
   last;
  }
  $found=0;
 }

So gings gar nicht. Deshalb habe ich das "!" rein gemacht :

$scantype = ($FORM{'type'} eq "all") ? '.' : '.'.$FORM{'type'};
foreach $new_line (@filename) {
 next if ($new_line eq '.' || $new_line eq '..');
 next if ($new_line !~ /.*($scantype)$/ );
 next if ($new_line !~ /^.ht/ );
 foreach $test_line (@lines)  {
  ($file_id,$stub) = split(/|/,$test_line,2);
  if ($new_line eq $file_id) {
   $found =1;
   last;
  }
  $found=0;
 }

Jetzt scannt er wieder, aber auch die .htaccess und .htpasswd scannt er wieder mit ein.
Auch wenn ich das ".*" weglasse gehts leider nicht.

Wo kann der Fehler liegen ?

Gruß
meggamoon