perl - %$var 是否取消引用 Perl 哈希？

Question

我正在向一个子程序发送一个哈希值，然后用 my($arg_ref) = @_; 获取它

但究竟是什么%$arg_ref ?是 %$取消引用哈希？

Answer 1

$arg_ref是标量，因为它使用 $印记。据推测，它持有一个哈希引用。是的，%$arg_ref散列引用的尊重。另一种写法是%{$arg_ref} .这使得代码的意图更加清晰，尽管更加冗长。

引自 perldata(1) :

 Scalar values are always named with '$', even when referring
 to a scalar that is part of an array or a hash.  The '$'
 symbol works semantically like the English word "the" in
 that it indicates a single value is expected.

     $days               # the simple scalar value "days"
     $days[28]           # the 29th element of array @days
     $days{'Feb'}        # the 'Feb' value from hash %days
     $#days              # the last index of array @days

所以你的例子是:

     %$arg_ref           # hash dereferenced from the value "arg_ref"

my($arg_ref) = @_;获取函数参数堆栈中的第一项并将其放入名为 $arg_ref 的局部变量中.调用者负责传递散列引用。一种更规范的写法是:

my $arg_ref = shift;

要创建散列引用，您可以从散列开始:

some_sub(\%hash);

或者您可以使用匿名哈希引用创建它:

some_sub({pi => 3.14, C => 4}); # Pi is a gross approximation.