我有以下地图:
my %cps_per_level = (
Bronze => [100 , 65 ],
Silver => [200 , 125 ],
Gold => [400 , 250 ],
Platinum => [800 , 500 ],
Diamond => [1200, 750 ],
Master => [2000, 1200],
Grandmaster => [3000, 1750],
);
在我的代码中,我希望将特定条目的列表的两个值都获取为2个变量。我的第一次尝试是取消引用特定条目的列表,然后应用列表切片并将其分配给我想要的变量,如下所示。这里$level
包含地图的一个关键字。
my ($cps_before, $cps_after) = $cps_per_level{$level}[0,1];
但这不起作用。 $cps_before
获取列表的第一个值,但$cps_after
什么也得不到。我设法通过写两行来使它成功:
my $cps_before= $cps_per_level{$level}[0];
my $cps_after = $cps_per_level{$level}[1];
我的问题是:为什么片不起作用?我错过了什么?
答案 0 :(得分:6)
那不是一个片。如果您有@array
,则切片看起来像这样:
@array[0, 1, 2]
你写的内容相当于:
$array[0, 1, 2]
...在标量上下文中使用,
,相当于$array[2]
。
事实上,
$cps_per_level{$level}[0,1]
是
的简写$cps_per_level{$level}->[0,1]
是
的语法糖${ $cps_per_level{$level} }[0, 1]
这意味着
${ $cps_per_level{$level} }[1]
你应该做的是:
@{ $cps_per_level{$level} }[0, 1]
@
表示您正试图获取多个元素。
如果你的perl足够新(5.20且自5.24起不再具有实验性),你也可以使用这样的后缀解除引用形式:
$cps_per_level{$level}->@[0, 1]