Perl 函数和作用域。

devel

come from this link http://esmith.ss.ics.tut.ac.jp/xyh/program/perl/Perl1-2.htm

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能判断一个函数是用在要求数组的环境还是要求在标量的环境。

the_threeeyes

shift从栈底取值
pop从栈顶取值
是这样理解吧？
从栈中取出后这个值就不存在于栈中了

KornLee

说白啦,shift是从一个数组的头部(左)取出一个元素,而pop是取一个数组的尾部(右)的元素,当这个数组是空的时候,perl就自动把这个数组定义成undef.