Perl连接SQL2005

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› Perl›Perl教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

这篇文章主要介绍怎么通过perl 的DBI 模块来操作sql 数据库。本文假设你已经了解了SQL的基本用法和perl 语言。

一 perl下如何连接sql。

DBI下有很多方法都可以连接到sql，本例介绍的方法只是其中的一种，它使用的是ODBC。读者可以尝试使用mysql等。实例如下：

;

二接下来看如何创建一个表以及表的相关insert， update， delete等操作。

1 建立一个表：

$SQL= "create table [user](ID integer primary key identity(1, 1), username text not null, password text not null, email text not null)";

$CreateTable = $dbh->do($SQL);

2 insert update和delete

);

3 读取数据：

$SQL= "select * from [user]";

$Select = $dbh->prepare($SQL);
$Select->execute();

while($Row=$Select->fetchrow_hashref)
{
print "$Row->{username} $Row->{email}";
}

--- END