#pm.pl
print "Arg $_: $ARGV[$_]\n" for 0 .. $#ARGV;

##</code><code>##

$ perl pm.pl one two three "four five"
Arg 0: one
Arg 1: two
Arg 2: three
Arg 3: four five