perl连接数据库

需要DBI模块
use DBI;
$dbh=DBI->connect($data_source,$user,$passwd);

$data_source应该包括需要使用的DBD的信息。postgreSQL的驱动是DBD:Pq，MYSQL是DBD:mysql。
例如：“DBI:mysql:database=eygle”，如果要制定连接到其他mysql服务器上，可以使用host=*****。
例如：“DBI:mysql:database=eygle;host=*******”。

连接上后，就可以对数据库进行操作。

插入数据：
my $rows=$dbh->do("INSERT INTO test (id, name) VALUES (1, 'eygle')");

查询数据：
$sth=$dbh->prepare("select * from test");
$sth->execute();




最后关闭连接：
$dbh->disconnect();