{   local $\ = "\n";
    while (<>) {
        chomp;
        if (/^ENDDESCRIPTION$/) {
            print "\n";
            $\ = "\n";
        }
        print;
        $\ = "" if /^DESCRIPTION$/;
    }
}