perl -ne 'print unless /\x1a/;' concatfile >x.txt #### perl -npe 's/\x1a//;' concatfile >x.txt