Perl do...while 循環
Perl 循環不像 for 和 while 循環，它們是在循環頭部測試循環條件。在 Perl 語言中，do...while 循環是在循環的尾部檢查它的條件。
do...while 循環與 while 循環類似，但是 do...while 循環會確保至少執行一次循環。
語法
語法格式如下所示：
do
{
statement(s);
}while( condition );
請注意，條件表達式出現在循環的尾部，所以循環中的 statement(s) 會在條件被測試之前至少執行一次。
如果條件為 true，控制流會跳轉回上面的 do，然后重新執行循環中的 statement(s)。這個過程會不斷重復，直到給定條件變為 false 為止。
流程圖
實例
#!/usr/bin/perl
$a = 10;
# 執行 do...while 循環
do{
printf "a 的值為: $a\n";
$a = $a + 1;
}while( $a < 15 );
執行以上程序，輸出結果為：
a 的值為: 10 a 的值為: 11 a 的值為: 12 a 的值為: 13 a 的值為: 14
