Perl until 循环
只要给定条件为假，Perl 编程语言中的 until 循环语句就会重复执行目标语句。
语法
Perl 编程语言中 until 循环的语法是 −
until(condition) {
statement(s);
}
这里的 statement(s) 可以是单个语句或语句块。 条件 可以是任何表达式。 循环迭代直到条件为真。 当条件为真时，程序控制传递到紧跟在循环后面的行。
数字 0、字符串 '0' 和 "" 、空列表 () 和 undef 在布尔上下文中都是 false，所有其他值都是 true。 ! 或 not 对真值的否定返回一个特殊的假值。
流程图
until 循环的关键点是循环可能永远不会运行。 当条件测试结果为真时，将跳过循环体，执行直到循环之后的第一条语句。
示例
#!/usr/local/bin/perl
$a = 5;
# until loop execution
until( $a > 10 ) {
printf "Value of a: $a\n";
$a = $a + 1;
}
这里我们使用比较运算符 > 将变量 $a 的值与 10 进行比较。因此，直到 $a 的值小于 10，until 循环继续执行它旁边的代码块，并且作为 当 $a 的值大于 10 时，它就出来了。 执行时，上面的代码产生以下结果 −
Value of a: 5 Value of a: 6 Value of a: 7 Value of a: 8 Value of a: 9 Value of a: 10
