在Perl中传递标量引用

前端之家收集整理的这篇文章主要介绍了在Perl中传递标量引用前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我知道将标量传递给sub实际上是通过引用,但由于我是perl的新手,我仍然进行了以下测试:
#!/usr/bin/perl
$i = 2;
subr(\$i);
sub subr{
    print $_[0]."\n";
    print $$_[0]."\n";
}

我认为第一行是打印一个地址,第二行是给回数,但第二行是空行.我被其他人指出要执行此操作:${$_ [0]}并打印该数字.但她不知道为什么没有{}它不起作用以及为什么它与{}合作.那发生了什么?

解决方法

这是因为你的第二个印刷声明相当于这样做……
my $x = $$_; print $x[0];

当你想要的是

my $x = $_[0]; print $$x;

换句话说,取消引用发生在计算数组下标之前.

当你添加那些curl-wurlies时,它告诉perl如何解释你想要的表达式;它将首先评估$_ [0],然后取消引用以获取该值.

猜你在找的Perl相关文章