Useless use of a variable

[Christoph Schnauß]

hallo,

na ja, ein paar zeilen vor der als fehlerhaft gemeldeten oder ggf. die komplette funktion, in der der fehler auftaucht, können ja nie schaden.

Bittesehr. Es handelt sich um zwei "if"-Bedingungen. Die erste sieht so aus:
   if ($boolean => 'und' || !$boolean ) {
      foreach $term (@terms) {
         if ($case => 'Insensitive' || !$case ) {
            if (!($string =~ /$term/i)) {
               $include{$FILE} = 'no';
               last;
            } else {
               $include{$FILE} = 'yes';
            }
         } elsif ($case => 'Sensitive' || !$case ) {
            if (!($string =~ /$term/)) {
               $include{$FILE} = 'no';
               last;
            } else {
               $$include{$FILE} = 'yes';
            }
         }
      }
Die letzte Klammer wird angemeckert  -  und sämtliche Variablen sind durchaus vorhanden und auch erforderlich.
Die zweite Bedingung lautet:
   if ($string =~ /<title>(.*)</title>/i) {
      $titles{$FILE} = "$1";
   } else {
      $titles{$FILE} = "$FILE";
   }
Da wird dann die erste Zeile angemeckert.

bin allerdings in perl kaum bewandert, hilfreiche antworten zum konkreten code musst du dir also wahrscheinlich eher von anderen erhoffen ;-)

Wird schon noch jemand was dazu sagen können.

Grüße aus Berlin

Christoph S.