#!/usr/bin/perl
$_ = join '', <>;
s/\s+/ /g;
s/^ | $//g;
print;