TOP - Perl - next

nextはループ処理のブロック内において、next出現以降の処理を飛ばして次のループ処理へ移行します。
continueで指定されたブロックがある場合は該当するブロックの処理を実行します。

(例1)
$i = 0;
TEST: while ($i < 5)               # whileにラベルTESTを付ける
{
    print "$i\n";
    $i++;
    next TEST;                     # ここで次のループ処理へ移行
    print "ここは表示されない\n";
}
実行結果
0
1
2
3
4

(例2)
$i = 0;
TEST: while ($i < 5)               # whileにラベルTESTを付ける
{
    print "$i\n";
    next TEST;                     # ここで次のループ処理へ移行
    print "ここは表示されない\n";
}
continue
{
    $i++;
    print "ここは表示される\n";
}
実行結果
0
ここは表示される
1
ここは表示される
2
ここは表示される
3
ここは表示される
4
ここは表示される


Copyright(C) 2006-2011 CLAYPOT. All Rights Reserved.