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] ，解除引用（undefined）標量$a

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