arrays - 在perl中找出数组中元素的数量

Question

我正在尝试编写一个 Perl 脚本来遍历 XML 文件并查找名为“className”的所有条目。

我正在使用 XML::Simple事实证明这个库的名字很糟糕。

该库似乎将类似命名的元素序列表示为数组。

我正在尝试使用基本索引循环迭代列表中的元素。所以我试图找出数组中有多少元素:

    } elsif("ARRAY" eq ref(@_[0])) {
        my $list = @_[0];
        print "scalar($list): " . scalar($list) . "\n";
        print "\$#list: " . $#list . "\n";
        print "\n";
    }

这是我的代码的输出:

scalar(ARRAY(0x600845398)): ARRAY(0x600845398)
$#list: -1

我在网上找到了使用标量函数和奇怪的 $# 表示法的引用资料，但都没有给我一个有意义的数字。

Answer 1

$list 是数组引用，而不是数组。尝试标量@{$list}。另外 - 尝试将 XML::Twig 作为 XML 解析的一种方式。