いくつかの条件に不一致の処理

質問

{$CNF::pda{'browser'}{'agent'}{'list'}}というユーザーエイジェントのリストがあり、
そこに７つ登録されていて
7つすべてが条件不一致の場合に
以下のような構文だとホームというリンクが7回表示されてしまい困っています。
７つの条件不一致であった場合でも
1回しか（ホームへのリンクを1回しか表示しない）実行ようにしたいのですが
どのようにしたらいいのか具体的に教えてください。
どうかよろしくお願いいたします。

foreach (@{$CNF::pda{'browser'}{'agent'}{'list'}}) {
length($_) or next;
unless (index($ENV{'HTTP_USER_AGENT'}, $_) != -1) {
push(@menu,
qq|<a class=Menu href="$CNF::base{'home'}{'url'}">ホーム</a>|);}}

回答No.3

Tacosan

はたまた last

お礼

何度もありがとうございます。
すべてやってみたことなのですが
すべてダメでした。

回答No.2

Tacosan

あるいはフラグ

回答No.1

Tacosan

grep?