perl中函数参数的传递接收:
函数语法:
Sub subroutineName{
my (@argsTosubroutine) = @_; # 参数通过这种方式传递给函数
&doStuff; # 执行体
return ( @returnValue ); #
}
特殊数组变量 @_ 是参数栈,它对于被调用的子程序来说是本地数据。每次调用子程序时就把参数放入到 @_ 中。@_ 的工作方式非常象c和c++ 中的栈。因为参数栈是一个数组,所以传递给函数的参数的数量没有限制。而没个参数都是一个标量。当调用子程序时候,参数栈的长度是无关紧要的。无论把什么 参数传递给读者的子程序,perl 都将负责生成@_ , 并由子函数决定是否接收参数。
操作参数栈:
(在perl 中任何数组的下标都是从0开始的)。
对于@_象其他类型的数组一样可以通过下标来访问。
也可以利用shift 和 pop 函数来访问@_. 实际上shift 和pop表示 shift(@_) pop(@_) 即为两个对参数栈操作的函数。表示从栈顶还是栈底对参数栈进行操作。每次调用它们时候,他们取走第一个参数(shift)或做后一个参数(pop)。然后 在把参数存储在左侧的变量中,在继续执行时缩短@_.
本地@_ 栈。这个特性允许在一个函数内部调用函数,不必担心本层函数影响下层函数。这种灵活性允许perl使用递归程序,
返回值栈是perl 把值返回给子程序的调用者的方法。@values = subroutine ($arguments). 与参数栈相同,返回值栈也是数组形式。
子函数把值返回给主函数,主要有两种方法:
使用特殊的函数返回方式
使用缺省方式 (即查看子程序的最后一个表达式)。
1. Return 关键字
Return 关键字允许你立刻中断子函数,把参数栈内部的值返回给调用函数。
2. 缺省返回
如果在函数中没有return 语句,则子程序的最后一句实际上是返回值栈
3. Wantarray
该函数就是perl 中可以使子函数执行双重职责的函数。Wantarray能判断一个函数是用在要求数组的环境还是要求在标量的
例如:
#! /usr/bin/perl -w
#定义一个函数,获取logtrace页面
#参数为: 地区(area:xa sh bj sz) 序列号(seqnum) logtrace页面保存名 logtrace页面保存路径
sub get_logtrace
{
my (@args)=@_;
print "$args[0]\n";
print "$args[1]\n";
print "$args[2]\n";
print "$args[3]\n";
}
my @temp=('sz','2002','abc.html','/data/wwwroot/');
get_logtrace(@temp);
阅读(1034) | 评论(0) | 转发(1) |