perl - 如何确定数组引用中的元素数量？

Question

这是我面临的情况...

$perl_scalar = decode_json( encode ('utf8',$line));

decode_json 返回一个引用。我确定这是一个数组。如何找到 $perl_scalar 的大小？根据 Perl 文档，使用@name 引用数组。有解决方法吗？

此引用由散列数组组成。我想获得哈希数。

如果我做 length($perl_scalar)，我会得到一些与数组中元素数量不匹配的数字。

Answer 1

那将是:

scalar(@{$perl_scalar});

您可以从 perlreftut 获取更多信息.

您可以将引用的数组复制到普通数组，如下所示:

my @array = @{$perl_scalar};

但在此之前您应该检查 $perl_scalar 是否真正引用一个数组，用 ref :

if (ref($perl_scalar) eq "ARRAY") {
  my @array = @{$perl_scalar};
  # ...
}

更新

length 方法不能用于计算数组的长度，它用于获取字符串的长度。