perl -pe'BEGIN{print"__BEGIN__\n"}s/^\s*$/__BEGIN__\n__END__\n/;END{print"__END__\n"}' <file>