Perl中$#ARGV是什么意思？

出处：http://yesho.blogbus.com/logs/10279644.html

　　$#作为一个变量表示打印数字时默认的数字输出格式，后面加上ARGV又表示什么意思呢？

　　遇到perl的问题首先查perldoc，在perlvar里查到关于@ARGV的一条：

The array @ARGV contains the command-line arguments intended for the script. $#ARGV is generally the number of arguments minus one, because $ARGV[0] is the first argument, not the program's command name itself. See $0 for the command name.

　　可以看出，$#ARGV为命令行参数（不包括命令本身）的个数减一，即数组@ARGV最后一个元素的索引。用处也就是在程序开始时判断命令行参数个数，或者直接操作最后一个命令行参数。

　　本质上，$#加数组名表示数组最后一个元素的索引，其实，这种糟糕的语法来源于C Shell，在实际的代码中不常见。判断命令行参数个数，可以把@ARGV用在标量上下文中，直接操作最后一个数组元素，可以利用负数索引值。（参见 《perl语言入门》3.2 特殊的数组索引）

将一列数字从十进制转换为十六进制的简单Perl脚本：

#! /usr/local/bin/perl

for($i=0; $i<@ARGV; $i++) {

printf("%d=0x%x\n", $ARGV[$i], $ARGV[$i]);

}

运行：

$ perl d2h 100 500 751

结果：

100 = 0x64

500 = 0x1f4

751 = 0x2ef

相似地，十六进制转换成十进制：

#! /usr/bin/perl

for($i=0; $i<@ARGV; $i++) {

$val = hex($ARGV[$i]);

printf("0x%x = %d\n", $val, $val);

}