$_ = <>; chomp; print;
while (<>) {
    chomp;
    print "\n" unless s/^\s+//;
    print;
}
print "\n";