如何通过引用来更改Perl变量？

Question

为什么打印8？为什么不$e改变$i？

my $i = 8;

sub u
{
    return \$i;
}

my $e = u();
$e = "eer";
print $i; #8

Answer 1

引用不是别名。你必须明确地取消引用它们。

$$e = "eer"; # Store 'eer' into the variable referenced by $e

与

不同

$e = 'eer'; # Store 'eer' into $e, discarding its previous content