珀尔 | 获取数组的元素数

在Perl中，我们可以使用 scalar 函数来获取数组的元素数。

my @arr = (1, 2, 3, 4, 5);
my $count = scalar @arr;
print "数组元素数为: $count\n";

输出结果为：

数组元素数为: 5

在上述示例中，我们使用 scalar 函数将 @arr 数组的元素数赋值给变量 $count，最后打印出来。

除了 scalar 函数，还可以使用以下两种方式获取数组的元素数量：

# 使用 scalar 函数
my $count = scalar @arr;

# 使用 $#arr 变量
my $count = $#arr + 1;

# 使用 scalar(@arr) 函数
my $count = scalar(@arr);

其中，$#arr 变量表示数组的最后一个元素的下标，所以我们需要加上 1 才能获取数组的元素数。

总体来说，获取数组的元素数非常简单，在 Perl 中有很多种方式可以做到。