#commandline.pl

#\!C:\strawberry\perl\bin\perl.exe
$y=0;
for $x (@ARGV)
{print "argument $y is $ARGV[$y] \n";$y++;}