アルファベット、数字、記号のみからなるような行を捨てる

Perlワンライナー。

perl -nle 'print unless $_ =~ m/^[!-~\s]+$/' result.txt

ついでに半角カタカナさんも死んで欲しいとき。

perl -nle 'print $_ if $_ !~ /^(?:\xEF\xBD[\xA1-\xBF]|\xEF\xBE[\x80-\x9F])+$/' umls.txt 

参考

• http://code.nanigac.com/source/wiki/view/501