
「windows7 64bit に ActivePerl をいれています」
以下のプログラムを書いて実行したところ、エラーメッセージがでてきました。
Software error:
DBD::MySQL initialisation failed: Can't locate object method "driver" via package "DBD::MySQL" at C:/usr/local/lib/DBI.pm line 808.
Perhaps the capitalisation of DBD 'MySQL' isn't right. at C:/Apache2.2/htdocs/00001/shinki_data_sakusei.pl line 33.
これはつまり、DBD::MySQL がないよ!という意味であると思うのですが、ppmを起動してDBDにあたるモジュールをインストールして再実行してもまだ同じエラーがでます。どうしてもwindows7上で作らなければならないので、困っています。どこか参考になるサイトはないでしょうか?
=========================================
use strict;
use warnings;
# エラーをブラウザに表示
use CGI::Carp qw(fatalsToBrowser);
use utf8;
binmode STDIN, ':encoding(UTF-8)';
binmode STDOUT, ':encoding(UTF-8)';
binmode STDERR, ':encoding(UTF-8)';
use Encode;
use DBI;
# プログラム開始
# ユーザ名とパスワード
my $user = 'root';
my $pass = 'root';
#データベースへ接続
my $db = DBI->connect('DBI:MySQL:localhost', $user, $pass,);
if ( ! $db ){
print "エラー: $db->err $db->errstr\n";
}
# 命令
my $sth = $db->prepare( "SELECT * FROM login" );
# 実行
$sth->execute;
# 出力
while( my @row = $sth->fetchrow_array ){
print "@row\n";
}
#データベースから切断
$db->disconnect;
__END__
No.1ベストアンサー
- 回答日時:
ppmで DBD::mysql(DBD-mysql)はインストール済なんですね。
そうなのでしたら、おそらく
> my $db = DBI->connect('DBI:mysql:localhost', $user, $pass,);
のように、mysqlを小文字で指定していないのが原因でしょう。
Windowsではファイル名の大文字小文字は区別されませんが、
Perlとしてはモジュール名は大文字小文字が区別されます。
この回答への補足
# ユーザ名とパスワード
my $dbname = 'login_data';
my $dbhost = 'localhost';
my $user = 'root';
my $pass = 'root';
#データベースへ接続
my $db = DBI->connect( "DBI:mysql:database=$dbname;host=$dbhost", $user, $pass );
===================================================================
で実行してみましたが、今度はなにか、
Internal Server Error
でした(T_T) なんとかいろいろ頑張ってみます
No.2
- 回答日時:
これがプログラムの全てならば、
print "@row\n"; をする前に、
print "Content-type: text/plain\n\n";
がないというのがInternal Server Errorの原因をまず疑いたいところです。
Content-typeの設定を#プログラム開始 の直後 ~ #データベースへ接続 の手前 くらいに欲しいです。
はい、ご指摘のとおり、
print "Content-Type: text/html; charset=UTF-8\n\n";
を入れていなかったためのエラーでした。とても恥ずかしいです(T_T)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
警告を消したい
-
failed: Can't connect to loca...
-
laravel 本番環境でメールが送...
-
CGI::Carpを使っているのにInte...
-
LCD ディスプレイを Raspberry ...
-
例外処理のフローチャートの記...
-
「デバイスは PRN を初期化でき...
-
VBAで別モジュールへの変数の受...
-
標準モジュールを削除したい。(...
-
Excel VBAでリンク切れをチェッ...
-
エクセルVBAでシートモジュール...
-
Excel VBA 定義されたプロージ...
-
VBAProjectのモジュ...
-
初歩的な質問なのですが、サブ...
-
大量の標準モジュールを解放す...
-
Perl モジュールのアンインスト...
-
ユーザー定義関数に#NAME?が返...
-
VHDLにおける「generic」について
-
モジュールとクラスの違いって...
-
ユーザー定義関数をEXCELに常駐...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
LCD ディスプレイを Raspberry ...
-
prologのプログラムについて
-
laravel 本番環境でメールが送...
-
MySQLとの接続でfetchrow_array...
-
WWW::Mechanizeがプロシキ経由...
-
小数点の切り上げについて
-
failed: Can't connect to loca...
-
CGI::Carpを使っているのにInte...
-
データベースに接続したい
-
(Perl CPAN) DBDがはいらない
-
警告を消したい
-
"use CGI::Session"でエラーが...
-
Unicode::Japanese を継承できない
-
例外処理のフローチャートの記...
-
「デバイスは PRN を初期化でき...
-
Excel VBAでリンク切れをチェッ...
-
エクセルVBAでシートモジュール...
-
VBでグローバル変数を宣言するには
-
Excel VBAで、ユーザーフォー...
-
ユーザー定義関数に#NAME?が返...
おすすめ情報