#!/usr/bin/perl
foreach $arg (@ARGV) {
    print $space, $arg;
    $space = ' ';
}
print "\n";
