in reply to find a string and delete the lines associated with that..

perlintro perl -ne " print unless /blah/ " < infile > outfile