定义子程序

关键字sub

例如:

sub func

{

  $n+=1;

}

同c++不同的地方：在子程序里定义的变量$n属于全局变量，并且对于变量的位置没有要求，但是c++偏向于将子程序放在主函数的前面声明和定义，但是perl没有限制。

调用子程序

使用关键字符&

例如

&func; #n的值这时为1

&func; #n的值这是为2

返回值

两种方式：缺省方式返回和关键字return

缺省方式：把子程序中最后一句表达式作为返回值

例如在func中n的值就是返回值

return方式 ：用return关键字显式的标记返回值，立即返回，与c++相同

参数

传递参数：&func(1,10);#1和10就是这个子程序的实际参数

与c++的不同：定义时，没有形参列表。

子程序会自动将参数传入一个名为@_的数组，并且$_[0]表示第一个参数，依次类推

注意$_和$_[0]没有什么关系

值传递：？有没有类似引用形参这样的概念

例如：

sub max

{

  if($_[0]>$_[1]){

     $_[0];

}

else{

   $_[1];

}

}

调用：&max(2,3);

子程序的私有变量

关键字：my

sub max{

  my($m,$n);#mn为私有变量，生命周期只是存在于花括号内

}

use strict 编译命令

这样perl会要求你一定要用my来声明每个新的变量

如果没有my的限制，则编译的时候会产生fetal error

持久性私有变量

关键字：state

变量的作用域始终确定在子程序中，并且可以保留变量的值，有点static的意思