Perl until 迴圈
Perl 迴圈until 語句在給定條件為 false 時，重複執行語句或語句組。
語法
語法格式如下所示：
until(condition)
{
statement(s);
}
在這裏，statement(s) 可以是一個單獨的語句，也可以是幾個語句組成的代碼塊。
condition 可以是任意的運算式，當條件為 false 時執行迴圈。 當條件為 true 時，程式流將繼續執行緊接著迴圈的下一條語句。
流程圖
圖表中，until 迴圈的關鍵點是迴圈可能一次都不會執行。當條件為 true 時，會跳過迴圈主體，直接執行緊接著 while 迴圈的下一條語句。
實例
#!/usr/bin/perl
$a = 5;
# 執行 until 迴圈
until( $a > 10 ){
printf "a 的值為 : $a\n";
$a = $a + 1;
}
程式中在變數 $a 小於 10 時執行循環體，在變數 $a 大於 10 時，退出迴圈。
執行以上程式，輸出結果為：
a 的值為 : 5 a 的值為 : 6 a 的值為 : 7 a 的值為 : 8 a 的值為 : 9 a 的值為 : 10