Perl，dereference数组引用

Question

在下面的Perl代码中，我希望在数组

中引用数组引用

#!/usr/bin/perl

use strict;
use warnings;

my @a=([1,2],[3,4]);

my @b = @$a[0];

print $b[0];

然而它似乎不起作用。我希望它输出1。

@a是一系列参考文献

@b被$a[1]取消引用（我认为）

那么问题是什么？

Answer 1

这个东西很棘手。

@$a[0]被解析为(@$a)[0]，解除引用（未定义）标量$a

你想说@{$a[0]}。