#!/usr/bin/perl
foreach my $ARGV (@ARGV) {
    print "$ARGV";
    print ":";
}                  
exit 0;
                    