#!/usr/bin/perl

use strict;

undef $/;
my $text = <STDIN>;

$text =~ s/\n\s+/\n/g;

print $text;
