Perl-do-while-loop
提供:Dev Guides
Perl do … whileループ
ループの上部でループ条件をテストする for および while ループとは異なり、 do … while ループはループの下部でその状態をチェックします。
*do ... while* ループはwhileループに似ていますが、do ... whileループは少なくとも1回実行されることが保証されている点が異なります。
構文
Perlの do … while ループの構文は-
do {
statement(s);
}while( condition );
条件式はループの最後に現れるため、条件がテストされる前にループ内のステートメントが1回実行されることに注意してください。 条件が真の場合、制御のフローはジャンプして戻り、ループ内のステートメントが再度実行されます。 このプロセスは、指定された条件が偽になるまで繰り返されます。
数値0、文字列 '0’および ""、空のリスト()、およびundefはすべてブールコンテキストで false であり、他のすべての値は true です。 !*または *not による真の値の否定は、特別な偽の値を返します。
流れ図
例
#!/usr/local/bin/perl
$a = 10;
# do...while loop execution
do{
printf "Value of a: $a\n";
$a = $a + 1;
}while( $a < 20 );
上記のコードが実行されると、次の結果が生成されます-
Value of a: 10
Value of a: 11
Value of a: 12
Value of a: 13
Value of a: 14
Value of a: 15
Value of a: 16
Value of a: 17
Value of a: 18
Value of a: 19