调用子例程时perl自动生动化

Question

为什么在调用过程中自动生动化不起作用？在这种情况下也有办法禁止吗？

#!/usr/bin/env perl
no autovivification;
use Data::Dumper;

sub testsub { }

my $task;
print Dumper($task);    # $VAR1 = undef;
my $a = $task->{parent_id};
print Dumper($task);    # $VAR1 = undef;
my $b = testsub($task->{parent_id});
print Dumper($task);    # $VAR1 = {}; 

Answer 1

my $task
print Dumper($task)

此时，perl不知道要自动生成什么。它将$task的LVALUE引用传递给Dumper，Dumper对该引用不做任何操作，因此不会发生任何事情。

my $a = $task->{parent_id}

因为这是一个副本，所以它被视为一个RVALUE。因此，不需要生动化。

my $b = testsub($task->{parent_id})

要正确地使用LVALUE引用填充@_，perl现在必须创建哈希，以便它能够正确地传递引用。

为了避免这样做，您可以传入对$task的引用，然后在必要时在内部访问parent_id：

sub testsub { my $task_ref = shift; if (something) { $$task_ref->{parent_id} = 3 } }
my $b = testsub(\$task);