Perl - 数组引用，使用严格

Question

我有以下代码：

my @array = ('a', 'b', 'c');

my $region = \@array;  # Returns an array reference
my $Value = ${@{$region}}[3];   

我使用的是严格的；

这段代码在 Perl v5.8.6 中顺利通过，现在我安装了 v5.10.1，出现运行时错误：

不能将字符串 ("4") 用作 ARRAY 引用，而 "strict refs" 用于 ...

我将代码更改为以下，这解决了问题：

my @array = ('a', 'b', 'c');

my $region = \@Array;
my @List = @{$region};
my $Value = $List[3];   

我的问题是，以前的方式有什么问题？这两个版本之间有什么变化？ 我在这里错过了什么？

谢谢， 加尔

Answer 1

我会这样做：

my @array = ('a', 'b', 'c');
my $region = \@array;
my $Value = $$region[1];
print $Value;

输出：

b

Answer 2

${@{$region}}[3] 从来都不是访问 arrayref 的正确方法。我不太确定它是什么意思，我认为 Perl 也不是（因此在不同版本的 Perl 中行为不同）。

正确方法在perlref中解释：

my $Value = ${$region}[3]; # This works with any expression returning an arrayref
my $Value = $$region[3];   # Since $region is a simple scalar variable,
                           # the braces are optional
my $Value = $region->[3];  # This is the way I would do it