Perl 学习笔记－高级控制结构

1.unless控制结构

　　类似于独立的else语句; 要么条件为真, 要么执行语句块内的代码;  unless(<condition>){code...;} 等价于  if(<condition>){}else{code...;}  也就是当条件为假是执行.

unless (0) {
    print "Hello"; #Hello
}

2. until控制结构

　　until就是改装过的while, 区别在于它在条件为假是执行代码块.

$i = 2;$j = 10;
until($i>$j){
    $i++;
    print "Hello\n";
}

3.条件修饰词

　　为了进一步简化表达, 表达式后面可以接着一个用来控制它的修饰词, 例如if修饰词可以用来模拟一个if块. print "Hello Roger" if 0; #无输出  虽然条件写在后面, 但是仍然是先执行, 实际上就是一个if控制块;  所以学习Perl的时候先把语句读完才能理解意义.

　　有一些限制: 修饰词两边都只能写单个表达式, 修饰词的左边不能放多条语句, foreach只能用$_变量.

4.裸块控制结构

　　包含在花括号内, 相当于一个只执行一次的伪循环,在为临时词法变量圈定有效范围时很有效. 当某个变量只会在几行代码里用到时, 可以放它们在一个裸块里, 并就近声明变量.

5.elsif子句 -- 注意不是 elseif

if(<condition>){
}elsif(<condition2>){
}elsif(<condition3>){
}else{
}

6.自增自减

　　对Perl中的标量的操作,类似C语言. 也分前后, 效果和C语言一致.

7.for控制结构

　　感觉很像PHP里面的for循环,哈哈!

for($i=0;$i<10;++$i){
    code...;
}
#写成 for(1..10){}也能运行, 但是不是很规范

8. 3种循环控制

　　=> last操作

　　　　相当于C中的break; 表示立即结束循环. 用法如:  last; 

　　=> next操作

　　　　相当于C中的continue; 表示立即结束当前迭代; 用法如:  next if /<pattern>/;  

　　=> redo操作

　　　　控制返回到本次循环的顶端, 不会经过任何条件测试, 也不会进入下一次循环. 

　　可以为块加标签,以便更好地控制,  但是不常见.

9.三目运算符  ?: 和逻辑操作

　　和C语言中的一致.

　　"定义否"操作符: // , 由于|| 操作符能提供默认值:undef, 但是没有考虑到特殊情况, 就是已定义的假值, 也可能被意外替换为默认值.  

　　有时需要检查一个标量, 如果没有定义则定义, 如果已经定义了就保留原值:  $last_name = $last_name{$someone} // '(No last name)'; 

　　|| 和 && 可以使用单词书写: or 和 and, 如 open MYFILE, "myfile.txt" or die "Can't open file myfile.txt!"; ,它们效果相同, 但是优先级要低得多, 所以可以不用写很多括号.