Perl获取数组长度

列表/数组的长度

当数组变量出现在预期简单标量出现的地方，则Perl解释器取其长度。

@array = (1, 2, 3); 

$scalar = @array; # $scalar =3,即@array的长度 

($scalar) = @array; # $scalar = 1,即@array第一个元素的值, 列表赋值

注：以数组的长度为循环次数可如下编程：

my $count = 0; 

while ($count < @array)

{ 

print ("Element[$count]:$array[$count]\n"); 

$count++; 

}

$size = scalar @array;