42、Perl until 循环

Perl 中的 until 语句可以在给定条件为 false 时，重复执行语句或语句组

until 语句语法格式

Perl 中的 until 语句语法格式如下所示：

until(condition)
{
   statement(s);
}

语法格式中的

• statement(s) 可以是一个单独的语句，也可以是几个语句组成的代码块
• condition 可以是任意的表达式，当条件为 false 时执行循环； 当条件为 true 时，程序流将继续执行紧接着循环的下一条语句

until 语句流程图

Perl 中的 until 语句流程图如下

流程图中， until 循环的关键点是循环可能一次都不会执行。 因为当条件为 true 时，会跳过循环主体，直接执行紧接着 while 循环的下一条语句。

范例 : Perl 中的 until 语句的使用

#!/usr/bin/perl

=pod

  file: mail.pl
  author: DDKK.COM 弟弟快看，程序员编程资料站(www.ddkk.com)

  Copyright © 2015-2065 www.ddkk.com. All rights reserved.

=cut
$step = 13;

# 执行 until 循环

until( $step > 17 )
{
   printf "step 的值为 : $step\n";
   $step += 1;
}

程序中在变量 $ step 小于 17 时执行循环体，在变量 $ step 大于等于 17 时，退出循环。

运行以上范例，输出结果为:

$ perl main.pl
step 的值为 : 13
step 的值为 : 14
step 的值为 : 15
step 的值为 : 16
step 的值为 : 17