print $1 if <$a> =~ m/(error.*)/; # Nothing printed though the files h +as the line containing error key word.
print map /(error.*\n)/, <$a>;
In reply to Re: Grepping the filehandler
by jwkrahn
in thread Grepping the filehandler
by arunkumar.rk141
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |