川合孝典です。

----- Original Message -----
From: "gosikaku" <gosikaku@xxxxxxxxxx>
To: <ml@xxxxxxxxxx>
Sent: Thursday, December 27, 2001 1:14 PM
Subject: [mysql 04847] Re: SELECT が実行できない


> 宏です
（中略）
> なんで何も表示されないのかなぁっと思い
>
>   if ($@) {
>        print "Content-type: text/html\n\n";
>       print"test";
>       warn "SQL error: $@";
>   }
>
> プログラム中の上記の部分に「print"test";」というのを付け加えて、「if
 ($@)」
> は実行されるのか？と思い試してみたところ、ブラウザには「test」と表示され
> ました。
> これは、やはりエラーが発生しているけどエラーメッセージが表示されないだけ
> と判断して良いのでしょうか？
他にそのメッセージを出していないのだとすれば、そうなんでしょう。
       print"test: $@";
とすればエラーがわかると思います。
まぁそうでなくてもApacheのログを見れば何か出ていると思うのですが。
# [スタート]-[Apache HTTP Server]-[Review Server Log Files]
# -[Review Error Log] で表示されるんじゃないかと思いますが。

また、これじゃあ...。$sqlって何も入ってないですよね？
#use strictをつけることをお勧めします
<引用>
   $sth = $dbh->prepare( qq{ SELECT * FROM userdb
                             WHERE id = "$remoteuser"
                             });
  eval {
      my $sth = $dbh->prepare($sql);
      $sth->execute;
  };
  if ($@) {
       print "Content-type: text/html\n\n";
      warn "SQL error: $@";
  }
</引用>
エラーの確認のためであれば、
  eval {
     $sth = $dbh->prepare( qq{ SELECT * FROM userdb
                             WHERE id = "$remoteuser"
                             });
      $sth->execute;
  };
  if ($@) {
       print "Content-type: text/html\n\n";
       print "ERROR: $@";
  }
こうするとか

  eval {
     $sth = $dbh->prepare( qq{ SELECT * FROM userdb
                             WHERE id = ?
                             });
      $sth->execute($remoteuser);
  };
  if ($@) {
       print "Content-type: text/html\n\n";
       print "ERROR: $@";
  }
では？
===================================================
川合 孝典 (Hippo2000)
   DBI日本語メーリングリスト管理人、Kansai.pm所属
   kwitknr@xxxxxxxxxx GCD00051@xxxxxxxxxx
   http://member.nifty.ne.jp/hippo2000
   http://www.hippo2000.net/
===================================================