perl -ibak -we 'local $/ = "\n\n"; while (<>) { local $/ = "\n"; chomp; print }' ./data.dat