Help for this page
perl -ne 'BEGIN {$p = shift} print if /$p/' PATTERN files ...
grep PATTERN files ...