日志

第二天 for perl learing---1子程序

已有 850 次阅读| 2012-11-5 13:58

当你真正想做些什么事情时，其实会发现原来无聊，发呆的时间没有了，时间总是不够用的。

chapter 4 子程序

子程序的概念应该就是它字面的意义，没有什么难以理解的。

1 定义子程序时的语法结构：

sub marine {

$n += 1;

print "hello";

}

调用的格式：&marine；（神奇的与号阿）

注：与号有时可以省略。

例：my @cards = shuf(@deck);

2 返回值：

自动：最后一次的运算结果。

设置返回值：return $_

3 参数：

$n = &max(10, 15);

perl 会自动将参数列表化名为数组变量@_. 这是系统对于默认变量的存储方式。

对于子程序来说，第一个参数存储于$_[0],第二个参数就存储于$_[1]。

定义私有变量：my($m, $n);

($m, $n) = @_; # 将参数赋值给变量

关于my 变量：my 操作符不会改变变量赋值时的上下文

my 可以用于if ，while, foreach 语句块中

持久性的私有变量：state $sum = 0;

state @numbers;