使用Perl连接Mysql数据库
网站后台数据库转为Mysql，现在使用Perl连接数据库就方便多了。
通过DBI，Perl可以很容易的连接到数据库:
#!/bin/perl
use DBI;
# Connect to target DB
my $dbh = DBI-connect("DBI:mysql:database=eygle;host=localhost","username","password", {'RaiseError' = 1});
# Insert one row
my $rows = $dbh-do("INSERT INTO test (id, name) VALUES (1, 'eygle')");
# query
my $sqr = $dbh-prepare("SELECT name FROM test");
$sqr-execute();
while(my $ref = $sqr-fetchrow_hashref()) {
print "$ref-{'name'}";
}
$dbh-discon...[ 查看全文 ]
