Perl 学习笔记（6）
控制程序流
本章中将要学习：语句块；运算符；循环；标号；程序执行后退出Perl
一、if语句
if (expressn) BLOCK
if ($r == 5) {
print 'The value of $r is equal to 5.';
}
只有当表达式是真的时候，表达式后面的语句块才运行；如果表达式不是真，那么else后面的语句块运行。
$r=<STDIN>;chomp $r;
if ($r == 10) {
print '$r is 10';
} else {
print '$r is something other than 10....';
$r=10;
print '$r has been set to 10';
}
请记住，运算符=用于赋值，而==则用于测试一个等式。
$r=10;
if ($r==10) {
print '$r is 10!';
} elsif ($r==20) {
print '$r is 20';
} else {
print '$r is neither 10 nor 20';
}
==================================================
如果想测试非数字值，可以使用字母关系运算符
eq $e eq $t 等于
gt $e gt $t 大于
lt $e lt $t 小于
ge $e ge $t 大于等于
le $e le $t 小于等于
ne $e ne $t 不等于
=========================================================
逻辑运算符
&& and $s &&$t 当都为真，才是真
|| or $a || $b 当有一个为真，才是真
！ not ！$m 不为真，才为真(求反)
if ($x and $y and not $z) {
print "All conditions met.\n";
}
运算符|| 和 or 并不完全相同，|| 运行优先级要高于or。也适用于&& /and
=========================================================
二、用while进行循环
当perl遇到while语句时，它就计算该条件。如果条件计算的结果是真，代码就运行。当运行到代码块的结尾时，表达式被重新计算，如果结果仍然是真，代码块重复执行。
$counter=0;
while ($counter < 10) {
print "Still counting,,,,,,,,$counter";
$counter++;
}
=================================================================
三、使用for循环
for语句是perl循环结构中最复杂和最有用的
for ($a=0;$a<10;$a=$a+2) {
print "a is now $a\n";
}
在上面的代码中，$a设置为0，执行测试表达式$a<10，发现结果为真。循环的本身输出了一条消息，然后递增语句$a=$a+2开始运行，将$a的值递增2.
=========================================================
明细控制
while ($i<10) {
last if ($i==5);
$i++;
}
last语句能够在$i的值是5时使while循环退出
next语句使得控制权被重新传递给循环的顶部
for ($i=0;$i<100;$i++) {
next if (not $i %2);
print "An odd number=$i\n";
}
==================================================
退出perl
exit语句是最后的一个流控制工具。当perl遇到exit语句时，程序就停止执行，perl 将一个退出状态返回给操作系统。
if ($user eq 'quit') {
print "Good bye\n";
exit 0;
}