Perl vivification问题,同时解除引用未定义的数组引用
发布时间：2020-12-15 21:18:19 所属栏目：大数据 来源：网络整理
导读：我很难理解为什么以下的作品： my $array_reference;foreach $element (@{$array_reference}) {# some code} 而以下则不起作用 my $array_reference;if (scalar (@{$array_reference}) { # some code here} 我明白perl带来了生命(自动生化)未定义的参考。但
|
我很难理解为什么以下的作品：
my $array_reference;
foreach $element (@{$array_reference}) {
# some code
}
而以下则不起作用 my $array_reference;
if (scalar (@{$array_reference}) {
# some code here
}
我明白perl带来了生命(自动生化)未定义的参考。但是我仍然感到困惑，因为后者的代码段为什么会引发FATAL。 解决方法
Dereferences在左值上下文中自动化(意味着预期可修改的值)，并且foreach创建一个左值上下文。
>perl -E"$$x = 1; say $x;"
SCALAR(0x74b024)
>perl -E"++$$x; say $x;"
SCALAR(0x2eb024)
>perl -E"$$x; say $x;"
SCALAR(0x30b024)
>perl -E"sub {}->($$x); say $x;"
SCALAR(0x27b03c)
>perl -E"for ($$x) {} say $x;"
SCALAR(0x25b03c)
最后两个创建一个左值上下文，因为它们需要一个值分配给别的$ _ [0]和$ _(分别)。 （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |