Perl last 语句

Perl last 语句用于退出循环语句块,从而结束循环,last语句之后的语句不再执行,continue语句块也不再执行。

语法

语法格式如下所示:

  1. last [LABEL];

流程图

Perl last 语句 - 图1

实例

  1. #!/usr/bin/perl
  2. $a = 10;
  3. while( $a < 20 ){
  4. if( $a == 15)
  5. {
  6. # 退出循环
  7. $a = $a + 1;
  8. last;
  9. }
  10. print "a 的值为: $a\n";
  11. $a = $a + 1;
  12. }

执行以上程序,输出结果为:

  1. a 的值为: 10
  2. a 的值为: 11
  3. a 的值为: 12
  4. a 的值为: 13
  5. a 的值为: 14