如何从 perl hashref 中提取多个值？ [复制]

Question

如何将 Perl hashref 解压成多个命名的标量变量？

我已经看到它完成了，但似乎无法让它工作。

假设$hashref 是给定的，$arg1 的定义为$arg3，这是我的尝试：

my $hashref = { arg1 => 'val1', arg2 => 'val2', arg3 => 'val3',};
my ($arg1,$arg2,$arg3) = @{%$hashref}[qw(arg1 arg2 arg3)]; 

Answer 1

你需要这个

my ($arg1,$arg2,$arg3) = @{$hashref}{qw(arg1 arg2 arg3)};

哪个是散列引用的散列切片