循环控制：
1.last
退出标签的语句块
2.next

3.redo
不推荐，循环次数不可控

4.goto
不推荐。
***************************************
标签：

先定义一个 label
last|next|redo|goto label；

last VS next 相当于C语言中的：
last ==>break
next ==>continue
*************************************
perl的continue语句：
continue{语句}与C中的不太一样
**************************************
单行条件语句与循环语句
语句+条件；

unless:print $a unless($a==0);
while: print $a while($a -==0);
untile: print $a untile($a -=0);
**************************************
用&& || 的条件语句（***）
$a==0&&print &a;
open(F,‘file‘) || die "can‘t open";

****************************************
die:
warn:

$!:内部变量，包含错误代码

$@:内部变量，包含错误信息

Perl学习之四：语句(续)