perl环境下安装mysql的数据库驱动的问题

Question

perl环境下安装mysql的数据库驱动的问题

Answer 1

需要安装 DBD::mysql 模块，你的系统中现在没有，因此无法连接到MYSQL数据库
安装方法是（在CMD方式下执行命令）：
ppm install DBD::mysql
或
perl -MCPAN -e "install DBD::mysql"
后面的命令需要你的电脑有C语言编译器

Answer 2

直接给代码哈。
use DBI;
my $DATABASE = DBI->connect("DBI:mysql:dbOffice:localhost",'(Username)','(Password)',{RaiseError=>1}) || "Database connection failure: $DBI::errstr";
if($DBI::err){
print "Content-type: text/html\n\n";
print "Database Connect Error...<br>($DBI::err) $DBI::errstr";
exit;
}
这是已测代码

 

Answer 3

用ppm装啊。。。不行的话下载到本地然后路径指为本地再装。。

或者就这样

use dbi

$self->{DBREF}=DBI->connect("DBI:mysql:database=$database;host=$host",$user,$password);