在Perl中传递标量引用

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

导读：我知道将标量传递给sub实际上是通过引用,但由于我是perl的新手,我仍然进行了以下测试： #!/usr/bin/perl$i = 2;subr($i);sub subr{ print $_[0]."n"; print $$_[0]."n";} 我认为第一行是打印一个地址,第二行是给回数,但第二行是空行.我被其他人指出要执行

我知道将标量传递给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],然后取消引用以获取该值.

（编辑：李大同）

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