Perl while ループ
Perl ループwhile 文は、与えられた条件が true の場合、文または文のグループを繰り返し実行します。ループ本体を実行する前に条件がテストされます。
構文
構文の形式は次のとおりです。
while(condition)
{
statement(s);
}
ここで、statement(s) は単一の文でも、複数の文からなるコードブロックでも構いません。
condition は任意の式です。条件が true の場合はループを実行します。条件が false の場合は、プログラムの流れはループを抜けます。
フローチャート
図の中で、whileループの重要な点は、ループが一度も実行されない可能性があることです。条件が false の場合、ループ本体をスキップして、while ループの直後の次の文を直接実行します。
例
#!/usr/bin/perl
$a = 10;
# while ループを実行
while( $a < 20 ){
printf "a の値は:$a\n";
$a = $a + 1;
}
プログラムでは変数 $a が 20 未満のときにループ本体を実行し、変数 $a が 20 以上のときにループを終了します。
上記のプログラムを実行すると、出力結果は次のとおりです。
a 的值为 : 10 a 的值为 : 11 a 的值为 : 12 a 的值为 : 13 a 的值为 : 14 a 的值为 : 15 a 的值为 : 16 a 的值为 : 17 a 的值为 : 18 a 的值为 : 19その他の拡張