Perl: One liner

File

Remove lines with special pattern

$ perl -ni -e 'print unless /pattern/' /path/to/filename