整理一下好多年前放在hi.baidu上的笔记！

perl简洁编程，《Perl语言入门（第五版）》读书笔记20110316！

书很早就买了，简单翻翻就扔下了！
最近买了ipad，良好的阅读体验，用来看书，感觉书又能看进去了！
不能白看一遍，整理一下阅读笔记！

Perl的程序竟能如此简洁！！！

sub division  {
    $_[0]/$_[1];
}

$_即为接收的数组，同时数据运算后，直接返回，省略了return。

sub max {    my($max_so_far)  =  shift @_; #数组中的第一个值，初始设定为最大值
    foreach (@_) {   #遍历数组@_中的其他元素
        if($_ > $max_so_far) { #当前元素比$max_so_far大的时候
            $max_so_far = $_;
        }  
    }
    $max_so_far;
}

函数参数的接收，@_对于函数，即为全部参数