Perl last 语句
Perl last 语句用于退出循环语句块,从而结束循环,last语句之后的语句不再执行,continue语句块也不再执行。
语法
语法格式如下所示:
last [LABEL];
流程图
实例
#!/usr/bin/perl
$a = 10;
while( $a < 20 ){
if( $a == 15)
{
# 退出循环
$a = $a + 1;
last;
}
print "a 的值为: $a\n";
$a = $a + 1;
}
执行以上程序,输出结果为:
- a 的值为: 10
- a 的值为: 11
- a 的值为: 12
- a 的值为: 13
- a 的值为: 14