[dredmorbius]

And here's what I've come up with, as ~/bin/unwrap:

    #!/usr/bin/perl -p
    
    use strict;
    
    BEGIN{$/=undef;} 
    
    { s/(?<!\n)\n(?!\n)//sg; }
    
    END {print"\n"}