Perl until 循环 - Perl 基础教程 - 简单教程，简单编程

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

until 语句语法格式

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

until(condition)
{
   statement(s);
}

语法格式中的

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

until 语句流程图

Perl 中的 until 语句流程图如下

Perl 中的 until 循环

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

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

#!/usr/bin/perl

=pod

  file: mail.pl
  author: 简单教程(www.twle.cn)

  Copyright © 2015-2065 www.twle.cn. 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