Perl中数组的大小可以使用数组的标量上下文来确定-返回值将是数组中元素的数量-
@array = (1,2,3); print "Size: ",scalar @array,"\n";
返回的值将始终是数组的物理大小,而不是有效元素的数量。您可以演示一下,使用此片段,标量@array和$#array之间的区别如下-
#!/usr/bin/perl @array = (1,2,3); $array[50] = 4; $size = @array; $max_index = $#array; print "Size: $size\n"; print "Max Index: $max_index\n";
输出结果
这将产生以下结果-
Size: 51 Max Index: 50
数组中只有四个元素包含信息,但是该数组的长度为51个元素,最高索引为50。