多重ループから抜ける
last LABELを使うと多重ループから抜けることができます。
LOOP: foreach my $i (1..10) {
foreach my $j (1..10) {
print "($i $j)\n";
last LOOP if ($j == 5);
}
}
関連項目
・lastループ制御コマンド・ループから抜ける
LOOP: foreach my $i (1..10) {
foreach my $j (1..10) {
print "($i $j)\n";
last LOOP if ($j == 5);
}
}