#!/usr/bin/perl
foreach $arg (@ARGV) {
    $arg .= ' ';            # Add a space to each argument.
}
$ARGV[$#ARGV] =~ s/ $/\n/;  # Change last space to a newline.
print @ARGV;
