perl

Perl中如何进行数据库操作

小亿
93
2024-04-16 09:31:06
栏目: 编程语言

在Perl中,可以使用DBI(Database Interface)模块来进行数据库操作。以下是一个简单的示例,演示了如何连接到数据库、执行查询并输出结果:

use DBI;

my $dsn = "DBI:mysql:database=testdb;host=localhost";
my $user = "username";
my $password = "password";

my $dbh = DBI->connect($dsn, $user, $password) or die "Unable to connect: $DBI::errstr";

my $sth = $dbh->prepare("SELECT * FROM users");
$sth->execute();

while (my @row = $sth->fetchrow_array()) {
    print join(", ", @row) . "\n";
}

$sth->finish();
$dbh->disconnect();

在这个示例中,首先建立了到MySQL数据库的连接,并执行了一个简单的查询来检索用户表中的所有数据。fetchrow_array()方法用于逐行检索结果,然后将结果以逗号分隔的形式输出。最后,完成查询和断开与数据库的连接。

0
看了该问题的人还看了