Perl でループから抜け出すにはどうすればいいですか? 質問する

breakループ内でステートメントを使用しようとしていますforが、Perl コードで厳密なサブも使用しているため、次のようなエラーが発生します。

./final.pl の 154 行目で「strict subs」が使用されているため、裸の単語「break」は許可されません。

これに対する回避策はありますか (厳密なサブを無効にする以外に)?

私のコードは次のようにフォーマットされています:

for my $entry (@array){
    if ($string eq "text"){
         break;
    }
}