征服Perl——子程序等相关知识——里程碑M5

什么没有

　　　　1 在Perl中的子程序是这样写的
　　sub sum
　　{
　　       $a+$b;
　　}
　　$a=2;
　　$b=3;
　　print &sum,"\n";
　　子程序任何时候都有返回值，在一个就是调用子程序就是&+子程序名
　　2 参数，在Perl中也是可以传参数的，但是参数自动存放在@_的数组中，也就是说参数存放在$_[0],$_[1]依次下推
　　3 看来Perl的子程序还真是cool啊！
　　4 Perl在每次调用时给我们提供@_这个私有变量
　　5 默认情况下Perl的所有变量都是全局的，当然你也可以定义私有的：my（$a）
　　6 在实际的Perl代码中，传递给子程序的参数个数是没有限制的
　　7 下面的是著名的算法，笔试的时候也经常考，呵呵，记住了啊！
　　sub max
　　{
　　       my($max_so_far)=shift @_;
　　       foreach (@_)
　　       {
　　               if($_>$max_so_far)
　　               {
　　                       $max_so_far=$_;
　　               }
　　       }
　　       print $max_so_far;
　　}
　　&max(3,5,10,4,6);
　　8 Perl的语法是很宽松的，如果你想让Perl变的严格点，那么就在代码的开始处添加，下面的话
use strict