perlでmysqlに接続
初歩的な質問で申し訳ありません。
perlでmysqlに接続できず困っています(OSはWindowsXPです)。
バージョンは下の通りです。
perl : ActivePerl-5.8.8.820-MSWin32-x86-274739
mysql : MySQL Server 5.0
DOSでppmを入力すると「perl package manager」というウィンドウが立ち上がり、「DBD-SQLite」と「DBI」をインストールすることができました。
サンプルコードは下の通りです。
#!C:/usr/local/Perl/bin/perl
use DBI;
$user = '*****';
$passwd = '*****';
$db = DBI->connect('DBI:mysql:bulletin_board:localhost', $user, $passwd);
$sth = $db->prepare("SELECT * FROM data");
$sth->execute;
$num_rows = $sth->rows;
print "該当 $num_rows 件\n";
for ($i=0; $i<$num_rows; $i++) {
@a = $sth->fetchrow_array;
print "no=$a[0], title=$a[1] name=$a[2] \n";
}
$sth->finish;
$db->disconnect;
DOSで実行すると
C:\Program Files\War-ftpd\FTPRoot\usr\f-taka\cgi-bin>perl sqlTest.cgi
install_driver(mysql) failed: Can't locate DBD/mysql.pm in @INC (@INC contains:
C:/usr/local/Perl/site/lib C:/usr/local/Perl/lib .) at (eval 4) line 3.
Perhaps the DBD::mysql perl module hasn't been fully installed,
or perhaps the capitalisation of 'mysql' isn't right.
Available drivers: DBM, ExampleP, File, Gofer, Proxy, SQLite, Sponge.
at sqlTest.cgi line 8
というエラーが出ました。原因は何なのでしょうか。
MySQL側で設定することはあるのでしょうか。
アドバイスお願いします。
お礼
お礼が遅くなって、本当にごめんなさい。 やはり、特別意識してロックする必要はなさそうですね。 ご親切にありがとうございました。