Perl until 迴圈

Perl 程式語言中的 until 迴圈語句會重複執行目標語句，直到給定條件為真。

語法

Perl 程式語言中 until 迴圈的語法如下：

until(condition) {
   statement(s);
}

這裡 statement(s) 可以是單個語句或語句塊。condition 可以是任何表示式。迴圈迭代直到條件變為真。當條件變為真時，程式控制將傳遞到迴圈後緊跟的語句。

數字 0、字串 '0' 和 ""、空列表 () 和 undef 在布林上下文中都為 false，所有其他值都為 true。使用 ! 或 not 對真值取反會返回一個特殊的假值。

流程圖

until 迴圈的關鍵點在於迴圈可能根本不會執行。當測試條件並結果為真時，將跳過迴圈體，並執行 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