Perl 言語では、別のループ内でループを使用できます。この概念を説明するために、いくつかの例を示します。
ネストされた for ループ ステートメントの構文:
のために(初期化;条件の増加) { のために(初期化;条件の増加) { ステートメント( s ) ; ステートメント( s ) ;ネストされた while ループ ステートメントの構文:
while (条件) { while (条件) { ステートメント( s ) ; ステートメント( s ) ;ネストされた do...while ループ ステートメントの構文:
する{ ステートメント( s ) ; ステートメント( s ) } while (状態) ; }その間(状態) ;ネストされた until ループ ステートメントの構文:
まで(条件) { まで(条件) { ステートメント( s ) ; ステートメント( s ) ;ネストされた foreach ループ ステートメントの構文:
フォーリーチ$a ( @listA ) { フォーリーチ$b ( @listB ) { ステートメント( s ) ; ステートメント( s ) ;上記のプログラムを実行すると、出力結果は次のようになります。
a = 0、b = 0a = 0、b = 1a = 0、b = 2a = 1a = 1、b = 0a = 1、b = 1a = 1、b = 2a = 2a = 2、b = 0a = 2、 b = 1a = 2、b = 2a = 3