MYsql 与perl...帮我写一断连接代码..

somo

UID: 1584
帖子: 4
积分: 9
在线时间: 10 分钟

1^# somo 发表于 2008-04-09 11:00

MYsql 与perl...帮我写一断连接代码..

MYsql 与perl...帮我写一断连接代码..
最好加上注释....

怎么才能判断perl连接上了mysql...等调试代码....
谢谢

forlorngenius

UID: 32353
帖子: 42
积分: 96
在线时间: 2 小时

2^# forlorngenius 发表于 2008-04-09 11:09

看programming DBI

放驴娃

UID: 1065
帖子: 164
积分: 377
在线时间: 1 天 12 小时

3^# 放驴娃发表于 2008-04-09 11:14

perldoc DBD::mysql

wlliam

UID: 39521
帖子: 40
积分: 92
在线时间: 2 小时

4^# wlliam 发表于 2008-04-09 14:16

用什么接口连接的？

alabos

UID: 36438
帖子: 89
积分: 204
在线时间: 11 小时

5^# alabos 发表于 2008-04-09 15:14

use DBI;

$dbh = DBI->connect('DBI:driver:database_name', 'username', 'auth',

{ RaiseError => 1, AutoCommit => 1});

$dbh->do($sql);

$sth = $dbh->prepare($sql);

$sth->execute();

while (@row = $sth->fetchrow_array) {

# ...

}

$sth->finish();

$dbh->disconnect();