perl – 为什么使用keys()而不是％{..}进行自动修复？

发布时间：2020-12-15 21:49:29 所属栏目：大数据来源：网络整理

导读：这是我用keys()发现的一个微妙之处. $perl -e 'use warnings; use strict; my $d = { "ab" = 1 }; my @e = keys(%{$d-{cd}});'$perl -e 'use warnings; use strict; my $d = { "ab" = 1 }; my %e = %{$d-{cd}};'Can't use an undefined value as a HASH refe

这是我用keys()发现的一个微妙之处.

$perl -e 'use warnings; use strict; my $d = { "ab" => 1 }; my @e = keys(%{$d->{cd}});'

$perl -e 'use warnings; use strict; my $d = { "ab" => 1 }; my %e = %{$d->{cd}};'
Can't use an undefined value as a HASH reference at -e line 1.

我最困惑的是为什么第一个片段不会给出解除引用错误.当我使用Data :: Dumper时,很明显在第一个片段中,$d-> {cd}被自动归一化为{}.

为什么密钥需要自动生成？我试着读它的perldoc,找不到令人满意的答案. key没有设置别名($_等)所以perl不需要认为$d-> {cd}需要在左值上下文中,是吗？ (我理解表达式是否需要在左值上下文中自动生成,如here所述.

解决方法

请注意,键确实可以是左值(设置哈希的预期元素数).

但即使密钥本身未在左值上下文中使用,它也会产生重置哈希迭代器的副作用.

因此它确实修改了哈希,因此给取消引用了左值上下文,这使得它自动生成.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!