use DBI;
my $database = 'xxx';
my $hostname = 'xxx';
my $port = '3720';
my $user = 'xxx';
my $password = 'xxx';
my $dsn = "DBI:MysqL:database=$database;host=$hostname;port=$port";
my $dbh = DBI->connect($dsn,$user,$password);
my $sql = "select id from tbl_t";
my $sth = $dbh->prepare($sql);
$sth->execute();
while (my $ref = $sth->fetchrow_hashref())
{
my $myid = $ref->{'id'} ;
print $myid,"/n";
}
$dbh->disconnect(); exit;
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 [email protected] 举报，一经查实，本站将立刻删除。
