Perl函数(子程序)学习笔记
更新时间：2014年11月28日 16:10:12 投稿：junjie
这篇文章主要介绍了Perl函数(子程序)学习笔记,本文讲解了函数定义、函数返回值、函数参数传递等内容,需要的朋友可以参考下
一、函数定义
子程序即一段分离的代码,它可以使减少重复代码且程序易读.perl中,子程序可以出现在程序的任何地方.但一般放在程序的开始或结尾.
复制代码 代码如下:
sub subroutine{
statements;
}
sub开始,子程序名同变量的命名规则,可与变量同名,最好不要与内部函数同名,如果与内部函数同名则用$subroutine区分,不用&是内部函数,用&是定义函数,但省略&时混淆.
带有原型说明的子程序定义:
复制代码 代码如下:
sub subroutine($$){ #需要两个简单变量的参数
statements;
}
说明:
1.()中的符号表示参数的类型,以一个字符表示一个参数.
2.$ 简单变量 @ 列表 % 散列 & 匿名子程序 * 引用
3.前加\为强制类型一致,;分隔必须的参数和可选参数.
4.\@$;$表示第一个参数为列表,第二个参数为简单变量,第三个参数简单变量可选.
二、函数返回值
1.缺省子程序中最后执行的一个语句的值将用作返回值,如果在if块中为最后执行的语句,虽然不是子程序的最后一句,也是返回值.
复制代码 代码如下:
$a=1;
不用等于,直接$retval;
复制代码 代码如下:
split(/:/,@a) 返回数组.
2.语句return(retval) 退出子程序并返回值retval,retval可以为列表.
3.返回错误
return 返回错误undef
用eval(‘subroutine') 函数,错误由$@变量中取得.
三、函数参数传递
形式:
复制代码 代码如下:
$sub1($num1,$unm2,$num3); 调用
sub sub1{
my($num1,$unm2,$num3)=@_;
}
my $num1=shift;
my $num2=shift;
my $num3=pop;
说明:
1.所有参数在数组@_中,每个元素为$_[0],$_[1]
2.@_,$_[]为局部变量,当子程序内再调用子程序时,@_不改变,会新生成另一份@_.
3.改变@_内元素的值如$_[0]会改变主程序的参数值.
4.shift pop 一次取一个参数.对@_操作,shift取第一个参数,然后删除,pop取最后一个参数再删除.
相关文章
perl常量、多维数组及变量的初始化的例子，供大家学习参考2013-02-02
在Perl排名持续下降的情况下学Perl，似乎是有点不明智。但是，工作需要，不得不学啊。再说，Perl现在在测试领域还是用得非常多的。Phython虽然也在测试领域开始活跃起来，不过我始终还是不太喜欢Phython的语法。2009-04-04
cpan安装Net::SSH::Perl中遇到的一些问题，需要的朋友可以参考下2013-02-02
perl中常用的函数集合，特分享下，方便需要的朋友2013-02-02
这篇文章主要介绍了Perl脚本实现检测主机心跳信号功能,本文代码也可作为perl串口通信的实例,需要的朋友可以参考下2014-10-10
Perl使用File::Basename获取文件扩展名的代码
本文为大家介绍的这个例子，实现了获取/home/topgkw中所有文件后缀，其中目录返回空值2013-02-02
perl处理xml的模块介绍，需要的朋友可以参考下2013-02-02
or比||优先级低，除此之外，两者无区别2013-02-02
Perl胶水实现前后台对接的方法，有需要的朋友可以参考下2013-02-02
perl有最好的文本数据处理能力.这是大家都知道的.在perl本身有一个别的软件没有的小功能,就是Perl格式.它相当于简单的命令行报表和图表输出2013-01-01
最新评论