TOP - Perl - ラベル

ラベルは名前の後に":"を付けたものです。ループの制御に利用します。

(例)
$i = 0;
TEST: while ($i < 5)             # whileにラベルTESTを付ける
{
    # ***** ブロック1 *****
    print "$i\n";
    next TEST;                   # ここで次のループ処理へ移行。ラベルTESTのループ条件式の判定から繰り返される
    print "ここは表示されない\n";
}
continue
{
    $i++;
}
実行結果
0
1
2
3
4


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