一、函数定义
子程序即一段分离的代码,它可以使减少重复代码且程序易读.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批量查询ip归属地的方法代码
- perl中my和our的区别分析
- 解析posix与perl标准的正则表达式区别
- Perl中的正则表达式介绍
- 为Java程序员准备的10分钟Perl教程
- Perl内置特殊变量总结
- Perl Sort函数用法总结和使用实例
- Perl调用shell命令方法小结
- perl 文件测试操作符汇总
- Perl使用nginx FastCGI环境做WEB开发实例
- perl查找进程PID的例子
- Perl一句话命令行编程中常用参数总结
- cpanm安装及Perl模块安装教程
- Windows和Linux系统下perl连接SQL Server数据库的方法
- 7个perl数组高级操作技巧分享
- Perl Substr()函数及函数的应用
