perl -l -0777 -pe 's/\n+(\D)/\1/g' file #### perl -l -00 -pe 's/\n(\D)/\1/g' file