perl操做mysql数据库

#!/usr/bin/perl -w use DBI; my $driver="DBI:mysql"; my $database="test"; my $user="root"; my $host="localhost"; my $passwd="luogen30"; my $dbh = DBI->connect("$driver:database=$database;host=$host;use

>>阅读原文<<