perl 经典入门(2)
perl 经典入门(2)2010年06月19日
第十章 更多的控制结构
unless控制结构
if是表达式为真时执行,如果希望表达式为假时执行可用 unless(除非)。表示除非表达式
为真,否则运行这个代码。它就像一个具有相反条件的if语句,也可以理解成一个独立的
else子 句。
123
unless ($aa = ~/^\w*$/i) {print "the value of \$aadoesn't look like a perl identifier name.\n";}
等同于
1234
if ($aa=~ /^\w*$/i) {} else {print "the value of \$aadoesn't look like a perl identifier name.\n";}
等同于
123
if(!$aa =~ /^\w*$/i) {print "the value of \$aa doesn't looklike a perl identifier name.\n";}
以上语句都被编译成相同的内部字节码,但unless最自 然。
unless的else子句
12345
unless ($aa =~/^(bb)/) {print "thisvalue like bb.\n";} else {print "do you see what's goingon here?\n";}
等同于
12345
if ($aa =~/^(bb)/) {print "doyou see what's going on here?\n";} else {print "thisvalue like bb.\n";}
until控制结构
while的反置结构。
12
until ($a> $b) {$a *= 2;
这个循环一直执行,直到条件表达式返回真为止。
表达 式修饰符
print “$n is a negative number.\n” if $n $j;&greet($_) foreach @person;
裸块控制块
所谓的 “裸(naked)块”,指的是没有关键字或条件的块。如:
12345
while (condition) {body;body;body;}
现在把while关键字和条件去掉,就得到一个裸块。
12345
{body;body;body;}
它 只执行一次,然后就结束,
其中一个作用是提供一个临时词法变量的作用域。一条通用的原则,所有变量就应该在最小
的作用域中声明。 如果你需要一个只用在几行代码中的变量,那么你可以把这些行放在裸块
中,并在该块中声明这个变量。
elsif子句
如果你 需要检查一组条件,一个接一个,看看哪个条件为真,就可以用elsif子句(注意不
是elseif)。perl会逐个测试条件表达式,当一个条件 成功就执行相应的代码。但如果测试项
太多,就不要使用这种方式,应该用类“case or switch”的语句。
自递增和自递 减
++ $a++; $a值不变。
++$a; 把$a增1,存到$a里。
页:
[1]