Perl 中使用 DBD::mysql 连接到 MySQL 数据库230

DBD::mysql 是一个 Perl 模块，它为连接和查询 MySQL 数据库提供了接口。它使用 MySQL 的 C 客户端库 libmysqlclient，因此需要在系统上安装该库。可以在 CPAN 或使用 Perl 包管理器 cpanm 安装 DBD::mysql：```
cpanm install DBD::mysql
```

安装完成后，可以使用以下代码连接到 MySQL 数据库：```perl
use DBI;
# 连接到数据库
my $dbh = DBI->connect('dbi:mysql:database=test;host=localhost', 'root', 'password');
# 使用 prepare() 创建一个准备好的语句
my $sth = $dbh->prepare('SELECT * FROM users WHERE name = ?');
# 绑定参数到准备好的语句
$sth->bind_param(1, 'John');
# 执行准备好的语句
$sth->execute();
# 检索结果
while (my $row = $sth->fetchrow_hashref) {
print "$row->{name} - $row->{email}";
}
# 关闭数据库句柄
$dbh->disconnect();
```

在上面的示例中，我们连接到名为 "test" 的数据库，主机为 "localhost"，用户名为 "root"，密码为 "password"。我们使用 prepare() 创建一个准备好的语句，然后使用 bind_param() 将参数绑定到该语句。最后，我们执行该语句，使用 fetchrow_hashref() 检索结果，并打印出用户姓名和电子邮件地址。

DBD::mysql 提供了广泛的方法和属性用于管理数据库连接和查询。以下是几个有用的方法和属性：* connect()：连接到数据库并返回数据库句柄。
* prepare()：创建用于执行参数化查询的准备好的语句。
* bind_param()：将参数绑定到准备好的语句。
* execute()：执行准备好的语句。
* fetchrow_hashref()：从结果集中检索下一行并将其作为散列引用返回。
* disconnect()：关闭数据库句柄。
* autocommit：控制是否在每个语句后自动提交事务。
* err：返回错误消息。
* errstr：返回错误字符串。

有关 DBD::mysql 的更多信息，请参阅 CPAN 文档：

2024-12-09

上一篇：探索 Perl 中遍历 Hash 的多种方式

下一篇：Perl脚本的扩展名：深入了解.pl文件