while() if(/([^\n])\n(.*)/sm) { print "$1\n"; } }