mysql读取表中内容_连接MySQL 读取表内容

下面是编程之家 jb51.cc 通过网络收集整理的代码片段。

编程之家小编现在分享给大家，也给大家做个参考。

#!/usr/bin/perl

# ppm install DBD::mysql

use DBI;

# use strict;

my $dbname = "test";

my $location = "localhost";

my $port = "3306";

my $database = "DBI:mysql:$dbname:$location:$port";

my $db_user = "root";

my $db_pass = "";

my $dbh = DBI->connect($database,$db_user,$db_pass);

my $sql = "SELECT * FROM y2k";

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

$sth->execute() or die "Cannot execute: $dbh->errstr";

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

print "@row\n";

}

#$rows = $dbh->do("INSERT INTO y2k VALUES ('2000-02-28','2000-02-28 00:00:00',20000228000000)")

#or die "Couldn't insert record : $DBI::errstr";

#print "$rows row(s) added to y2k\n";

$dbh->disconnect;

以上是编程之家(jb51.cc)为你收集整理的全部代码内容，希望文章能够帮你解决所遇到的程序开发问题。

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。