Perl的数组长度

From Yefu's notes
Jump to: navigation, search

列表/数组的长度

 当数组变量出现在预期简单变量出现的地方,则PERL解释器取其长度。
    @array = (1, 2, 3);
    $scalar = @array; # $scalar = 3,即@array的长度
    ($scalar) = @array; # $scalar = 1,即@array第一个元素的值
  注:以数组的长度为循环次数可如下编程:
    $count = 1;
    while ($count <= @array) {
    print ("element $count: $array[$count-1]\n");
    $count++;
    }

<comments/>