perl中子程序中参数的两种引用(传递)方式介绍
下面是一个例子:
use strict;
#这里是两个数组
my @i =('1','2','3');
my @j =('a','b','c');
#在进行处理之前,我们把他们先打印出来,看一看他们的样子
print "In main program before calling subroutine:i="."@i\n";
print "In main program before calling subroutine:j="."@j\n";
#然后我们通过子程序进行处理
reference_sub(@i,@j);
print "In main program after calling subroutine:i="."@i\n";
print "In main program after calling subroutine:j="."@j\n";
#下面是子程序
sub reference_sub
{
my (@i,@j)=@_;
print "In subroutine:i="."@i\n";
print "in subroutine:j="."@j\n";
#这里我们对@_的处理用pop,和shift来进行
push(@i,'4');
shift(@j);
}
得到的结果如下:
F:\>perl\a.pl
In main program before calling subroutine:i=1 2 3
In main program before calling subroutine:j=a b c
In subroutine:i=1 2 3 a b c
in subroutine:j=
In main program after calling subroutine:i=1 2 3
In main program after calling subroutine:j=a b c
F:\>
在这个例子中,子程序中有两个参数@i和@j,当我们将这两个参数传递到子程序的时候,子程序将他们全部放入了内置数组@_中,然后在@_中@i和@j的不同没有了,也就是在@_中混为一谈了,无法区分。当我们想重新得到他们两个的时候,我们发现,@i=1 2 3 a b c,而@j为空。在很多时候这显然不是我们想要得到的结果,所以我们要用到pass by reference(在大骆驼书第六章中被翻译为”传入引用“)
我们仅仅把代码做一个变动,也就是在
程序如下:
use strict;
#这里是两个数组
my @i =('1','2','3');
my @j =('a','b','c');
#在进行处理之前,我们把他们先打印出来,看一看他们的样子
print "In main program before calling subroutine:i="."@i\n";
print "In main program before calling subroutine:j="."@j\n";
#然后我们通过子程序进行处理
reference_sub(\@i,\@j);#在这里我们添加了反斜线,也就是pass byreference(传入引用,在大骆驼书中第六章翻译)
print "In main program after calling subroutine:i="."@i\n";
print "In main program after calling subroutine:j="."@j\n";
#下面是子程序
sub reference_sub
{
my ($i,$j)=@_;#引用也是一种特殊的数据形式,它们在@_中都被当成标量变量来储存
print "In subroutine:i="."@$i\n";所以这里引用它们的时候,我们在他们前面添加了两个符号,@代表这是一个数组,$代表着是一个二次引用。
print "in subroutine:j="."@$j\n";
print "In subroutine:the third element is $$j[2]\n";#当引用数组中的一个元素的时候第一个$和后面的j[2]代表数组中的第三个元素,而第二个$代表的就是二次引用
#这里我们对@_的处理用pop,和shift来进行
push(@$i,'4');
shift(@$j);
}
结果如下:
F:\>perl\a.pl
In main program before calling subroutine:i=1 2 3
In main program before calling subroutine:j=a b c
In subroutine:i=1 2 3
in subroutine:j=a b c
In subroutine:the third element is c
In main program after calling subroutine:i=1 2 3 4
In main program after calling subroutine:j=b c
F:\>
我们可以观察最后的结果,
在调用了子程序以后@i的值发生了变化:i=1 2 3 4 而j=b c。也就是说我们在子程序中对数组进行的push和shift操作在主程序中起了作用。
为什么会出现这种情况呢?
一般来说,我们在子程序中对变量进行了my声明,也就是只会在子程序中起作用,而不会改变主程序中的值。
在这里由于引用的是真实的参数,也就是主程序中的值,而不是它的备份,所以会得到相应的改变。
相关文章
- 虽然C++11引入了智能指针的,但是开发人员在与内存的斗争问题上并没有解放,如果我门实用不当仍然有内存泄漏问题,其中智能指针的循环引用缺陷是最大的问题。下面通过实例代码给大家介绍c++中的循环引用,一起看看吧...2020-04-25
- 这篇文章主要给大家介绍了关于Swift中优雅的处理闭包导致的循环引用的相关资料,文中通过示例代码介绍的非常详细,对大家学习或者使用Swift具有一定的参考学习价值,需要的朋友们下面来一起学习学习吧...2020-06-30
- 这篇文章主要介绍了详解C++数组和数组名问题(指针、解引用),指针的实质就是个变量,它跟普通变量没有任何本质区别,指针本身是一个对象,同时指针无需在定义的时候赋值,具体内容详情跟随小编一起看看吧...2021-09-18
- 本篇文章主要介绍了Swift中如何避免循环引用的方法,小编觉得挺不错的,现在分享给大家,也给大家做个参考。一起跟随小编过来看看吧...2020-06-30
- 这篇文章主要介绍了python全局变量引用与修改过程解析,文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友可以参考下...2020-04-30
- asp.net 组件开发中的内嵌资源引用实现代码,需要的朋友可以参考下。...2021-09-22
- 本篇文章主要是对c#中调用Surfer软件,添加引用的具体操作方法进行了介绍,需要的朋友可以过来参考下,希望对大家有所帮助...2020-06-25
- 这篇文章主要介绍了C++中引用&与取地址&的区别,有助于C++初学者更好的掌握指针的概念及用法,需要的朋友可以参考下...2020-04-25
- 下面小编就为大家带来一篇详谈C++引用&和指针在作为形参时的区别。小编觉得挺不错的,现在就分享给大家,也给大家做个参考。一起跟随小编过来看看吧...2020-06-25
深入学习C++智能指针之shared_ptr与右值引用的方法
智能指针的核心实现技术是引用计数,每使用它一次,内部引用计数加1,每析构一次内部的引用计数减1,减为0时,删除所指向的堆内存,今天通过本文给大家分享C++智能指针之shared_ptr与右值引用的方法,需要的朋友跟随小编一起看看吧...2021-07-13- 指针与引用看上去完全不同(指针用操作符*和->,引用使用操作符.),但是它们似乎有相同的功能,感兴趣的朋友可以了解下啊,或许本文对你有所帮助,好了,话不多说,切入正题...2020-04-25
Intellij Idea 多模块Maven工程中模块之间无法相互引用问题
这篇文章主要介绍了Intellij Idea 多模块Maven工程中模块之间无法相互引用问题,文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友们下面随着小编来一起学习学习吧...2021-01-16- perl中的my可以来定义私有变量,可以在很多情况下防止错误的发生...2020-06-29
- 今天小编就为大家分享一篇关于C++类中变量也可以是引用的代码实例,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧...2020-04-25
- 本篇文章是对C++中函数返回引用的注意事项进行了详细的分析介绍,需要的朋友参考下...2020-04-25
- 下面小编就为大家带来一篇关于finalize机制和引用、引用队列的用法详解。小编觉得挺不错的,现在就分享给大家,也给大家做个参考。一起跟随小编过来看看吧...2020-06-25
- 在php中我们函数传值就比较简单了,但可能有些朋友地天真无邪函数传址或引用搞不明白,下面小编来给各位介绍在php中函数传值与传址(引用)介绍,希望对各位有所帮助。 p...2016-11-25
- 本文主要介绍了C++中指针的引用*&的具体使用,文中通过示例代码介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们可以参考一下...2021-11-11
- 在php中一个简单的&符号可以有很大的文章可讲,我们今天简单讲一下关于php 变量引用与参数传值的用法,希望初学者看看参考这文章哦。 通过这种方式$a=test();得到的...2016-11-25
- 一、定义 子程序即执行一个特殊任务的一段分离的代码,它可以使减少重复代码且使程序易读。PERL中,子程序可以出现在程序的任何地方。定义方法为: sub subroutine{ sta...2020-06-29