perl -pi.bak -e 'BEGIN{$/=$u}s//\n/' foo*