在下面的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]
取消引用(我认为)
那么问题是什么?
答案 0 :(得分:10)
这个东西很棘手。
@$a[0]
被解析为(@$a)[0]
,解除引用(未定义)标量$a
你想说@{$a[0]}
。