for文を使うとなぜかエラーになります

質問

毎回大変お世話になっております。

現在、ブラウザでデータを入力し、それを検索条件としてDBにOracle接続、結果を表示するPGを作成しております。
問題は、結果表示のCGIファイルでSQL文内の「？」にデータを入れる「$sth->bind_param」を使用している部分において、なぜかfor文を使用するとエラーを起こし、「Error: Runtime exception」とログが掃いてしまいます。

問題となっている部分は以下のとおりです。
※@Kensaku_andにはAND条件とするキーワードが格納しています。
for($i = 0; $i <= $#kensaku_and; $i++) {
　$sth->bind_param($i+1, $kensaku_and[$i]);
}

この部分を以下のように書くと正常に動きます。
if ($Andcount >= 1) {
$sth->bind_param(1, $kensaku_and[0]);
}
if ($Andcount >= 2) {
$sth->bind_param(2, $kensaku_and[1]);
}
　　・
　　・

動作環境は以下のとおりです。
OS：Win2000Pro
Webサーバ：Apache1.3.26
Perl：5.005_03
IE:6.0SP1

if文で書いてしまうとソースが多くなってしまうので、for文（またはforeach文）で書きたいと思ってます。
なにか良い解決方法があればお願い致します。

回答No.1

so_blue · ベストアンサー

SQLには明るくないのですが....

foreach(0..$#kensaku_and){
　$sth->bind_param($i+1, $_);
　$i++;
}

ではどうでしょうか？

お礼

回答ありがとうございます。
so_blueさんが書いてくださったとおりに書き直したらできました！
本当にありがとございました！