Perl-next-statement

Perlの次のステートメント

Perlの next ステートメントは、ループの次の反復を開始します。 LABELはループのラベルである next ステートメントでLABELを提供できます。 next ステートメントは、LABELが指定されていない場合に最も近いループに適用されるネストされたループ内で使用できます。

ループ上に continue ブロックがある場合、条件が評価される直前に常に実行されます。 別の章にcontinueステートメントが表示されます。

構文

Perlの next ステートメントの構文は次のとおりです-

next [ LABEL ];

Copy

中括弧内のLABELは、LABELがオプションであることを示し、LABELが指定されていない場合、nextステートメントはコントロールを最も近いループの次の反復にジャンプします。

流れ図

Perl next statement

例

#!/usr/local/bin/perl

$a = 10;
while( $a < 20 ) {
   if( $a == 15) {
      # skip the iteration.
      $a = $a + 1;
      next;
   }
   print "value of a: $a\n";
   $a = $a + 1;
}

Copy

上記のコードが実行されると、次の結果が生成されます-

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 16
value of a: 17
value of a: 18
value of a: 19

Copy

私たちは次のステートメントと一緒にLABELを使用しようとしている一例を見てみましょう-

#!/usr/local/bin/perl

$a = 0;
OUTER: while( $a < 4 ) {
   $b = 0;
   print "value of a: $a\n";
   INNER:while ( $b < 4) {
      if( $a == 2) {
         $a = $a + 1;
         # jump to outer loop
         next OUTER;
      }
      $b = $b + 1;
      print "Value of b : $b\n";
   }
   print "\n";
   $a = $a + 1;
}

Copy

上記のコードが実行されると、次の結果が生成されます-

value of a : 0
Value of b : 1
Value of b : 2
Value of b : 3
Value of b : 4

value of a : 1
Value of b : 1
Value of b : 2
Value of b : 3
Value of b : 4

value of a : 2
value of a : 3
Value of b : 1
Value of b : 2
Value of b : 3
Value of b : 4

Copy