Perl-while-loop

提供:Dev Guides
移動先:案内検索

Perl whileループ

Perlプログラミング言語の while ループステートメントは、特定の条件が真である限り、ターゲットステートメントを繰り返し実行します。

構文

Perlプログラミング言語の while ループの構文は-

while(condition) {
   statement(s);
}

ここで、* statement(s)*は、単一のステートメントまたはステートメントのブロックです。 *条件*は任意の式です。 条件が真の間、ループが繰り返されます。 条件が偽になると、プログラム制御はループの直後の行に渡されます。

数値0、文字列 '0’および ""、空のリスト()、およびundefはすべてブールコンテキストで false であり、他のすべての値は true です。 !*または *not による真の値の否定は、特別な偽の値を返します。

流れ図

Perlのwhileループ

ここで、_while_ループの重要なポイントは、ループが実行されない可能性があることです。 条件がテストされ、結果がfalseの場合、ループ本体はスキップされ、whileループの後の最初のステートメントが実行されます。

#!/usr/local/bin/perl

$a = 10;

# while loop execution
while( $a < 20 ) {
   printf "Value of a: $a\n";
   $a = $a + 1;
}

ここでは、比較演算子<を使用して、変数$ aの値を20と比較しています。 したがって、$ aの値が20未満の場合、 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