重拾perl
原文：http://www.linuxsir.org/bbs/showthread.php?t=78216
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能判断一个函数是用在要求数组的环境还是要求在标量的环境。