my $file = '/path/to/file.log'; my $bool_pattern = 0; open(R_LOG,"<$file") or die $!; # Datei zum Lesen öffnen, bei Fehler -> Programmabbruch und Fehlermeldung while(my $line = ){ # solange Zeilen eingelesen werden $bool_pattern = 1 if($line =~ /DEIN_PATTERN/); # setze $bool_pattern auf 1, wenn das Pattern auftaucht } close R_LOG; # schließe die Datei restart_webserver() if($bool_pattern); # wenn pattern gefunden wurde, dann starte den Webserver