ダウンロードカウンタースクリプトのシバンの直後に挿入している一部です。

# ユーザーエージェントでロボット除外
$flag = 0;
$ua = $ENV{'HTTP_USER_AGENT'};

@block=(
"googlebot",# Googleロボットの除外
"msnbot"# MSNロボットの除外
);

foreach $block(@block){
if ($ua =~m/^$block/){ # ロボットならフラグをセット
$flag = 1;
}
}
# ロボット判定
if($flag eq 1){
exit();
}

と書いたのですが、IEからのアクセスでも500が出てしまいます。
何故でしょう？

ちなみにこの部分をコメントアウトすれば正常に動作します。
文字コードはSHIFT_JIS改行コードはWindows形式（CR+LFだっけ？）です。
よろしくお願い致します。