#!/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