use strict;
use warnings;
for my $arg (@ARGV) {
   print "arg=:$arg:\n";
}