#!/usr/local/bin/perl 

@input = <STDIN>; 
chop (@input); 
$string = join(" ", @input); 
print ("$string\n");