Suchen in txt Datei

[Matti Maekitalo]

use Mosche;

use strict;
$searchdata='/is/htdocs/www.bla.de/searchdata.txt';

my $searchdata = ...

print 'Welche Datei wollen Sie durchsuchen : ';
chomp (my $searchdata=<>);

print $searchdata;

Ist $searchdata leer? Fehlermeldung, weil du eine lexikal zu deklarierende Variable (s.o.) nochmals deklarierst?

open (FH, "<$searchdata");

while(my $search = <FH>){        #Zeilenweise einlesen
  if ($search =~ m/Blade/g) {   #Suchen nach dem Wort: und

$search =~ m/blade/i

Ansonsten bitte den echten Quelltext + Fehlermeldung.

use Tschoe qw(Matti);