in reply to remove new lines in flat files

I just throw in the one liner: perl -i.bak -F\\\| -ane 'print unless $F[0] eq q/cat_name_del/' datafile

-- Hofmator

In Section Seekers of Perl Wisdom