Help for this page
$logfile="log.txt";
if ($logfile =~ /$error/i) {
while (my $line = <LOG>) { if ($line =~ /$error/i) { etc....