http://qs321.pair.com?node_id=247501


in reply to Re: Re: delete a line by a string
in thread delete a line by a string

Save the code below to x.pl. Invoke with 'perl x.pl <filename>...'.

#!/usr/bin/perl -i -n print unless /\bsome string\b/;
90% of every Perl application is already written.
dragonchild