mysql - 使用 Perl CGI 和 XAMPP 连接到 MySQL 数据库

Question

我使用 Perl CGI 访问 XAMPP 中的 MySQL 数据库，代码如下:

#!/xampp/perl/bin/perl -w

use DBI;

print "Content-type:text/html\r\n\r\n";

$database = "mydb";
$host = "localhost";
$port = "3306";
$user = "root";
$pw = "";

$dsn = "dbi:mysql:$database:$host:$port";

print "Trying to connect <br />";
$connect = DBI->connect($dsn, $user, $pw, {RaiseError=>1});

if (defined $connect) {
    print "Preparing query <br />";
}

$query = "SELECT * FROM reference WHERE ID = 1742031";
$query_handle = $connect->prepare($query);

$query_handle->execute();

$query_handle->bind_columns(undef, \$pmid, \$popu, \$loc);

while($query_handle->fetch()) {
   print "$pmid, $popu, $loc <br />";
} 

但是我无法将结果打印到我的网页上。我觉得我是由于“正在准备查询”而无法连接到数据库行没有被打印。但我可以连接到数据库并执行这个查询来自 mysql 命令行。我不知道问题出在哪里。

编辑:安装缺少的 DBD:mysql 模块后，我收到一个新错误:“不能连接到 localhost (10061) 上的 MySQL 服务器”。我尝试按照此处的建议进行操作: MYSQL - Cant connect to MYSQL server on 'localhost' (10061)一切似乎都很好。我正在运行 mysqld.exe，并将 mysql 作为服务运行。另外，我可以通过 mysql 命令行以及 phpMyAdmin 连接到数据库，所以应该不存在权限问题，因为我只有一个 root 帐户。

请指教。我将不胜感激任何帮助。

Answer 1

How do I install this module?

在命令行上使用“cpan”:

> cpan 
cpan shell -- CPAN exploration and modules installation (v1.960001)
Enter 'h' for help.

cpan[1]> install DBD::mysql

如果尚未安装，您可以下载它:

https://metacpan.org/pod/DBD::mysql