#!/usr/bin/perl -w
#
# $Revision: 1.4 $ $Date: 2012-07-26 17:11:47-04 $
# $Source: /home/vogelke/bin/RCS/dehyph,v $
# $Host: sys7.com $
# $UUID: e9cd9fe1-c5a9-3f97-884e-94566879f0ae $
#
#<dehyph: join hyphenated lines.

use strict;
$/ = "";    # Enable paragraph mode.
$* = 1;     # Enable multi-line patterns.

while (<>) {
    s/-\n\s*//g;
    print;
}

exit(0);