perl -nle"/thesearchstring/ && print $." theFile