print OUTFILE map { /$phrase/ && $_}  <INFILE>;