#!/usr/local/bin/perl5.8.8
print join(q/ /, @ARGV), "\n";