#!/usr/bin/perl
#argvtest.pl
#run example:
#./argvtest.pl a0 a1 a2
#a0 -> ARGV[0]
#a1 -> ARGV[1]
#a2 -> ARGV[2]
# $#ARGV=2
#note the difference:
$aaa=@ARGV;
print $#ARGV , "\n"; # 2
print $aaa , "\n"; # 3
print "$aaa" , "\n"; # 3
print @ARGV , "\n"; # a0a1a2
print "@ARGV" , "\n"; # a0 a1 a2