Perl 的 DBI connect() 方法的使用

清华大佬耗费三个月吐血整理的几百G的资源,免费分享!....>>>

$dbh= DBI->connect("dbi:<RDMS>:<database>","<username>","<password>",
    \%attributes) or die("Couldn't connect");

$dbh=DBI->connect('DBI:mysql:sample_db','root','quigley1') or die "Can't connect";

$dbh=DBI->connect('DBI:mysql:database=sample_db;user=root;password=quigley1');