perl链接mysql测试脚本

#!/bin/perl use DBI; # Connect to target DB my $dbh = DBI->connect("DBI:mysql:database=mysql;host=localhost","root","root", 'RaiseError' => 1}); # query my $sqr = $dbh->prepare("S

>>阅读原文<<