■

DBIクラスメソッド

PerlでMySQLを使うときは、DBIモジュールを利用します。

・接続

$dbh = DBI->connect($data_source, $username, $password) or die $DBI::errstr;

・SQL文実行

$dbh->do($str) || die $dbh->errstr;

もしくは、

unless ($dbh->do($sql)) {
die $DBI::errstr. $sql;
}

・データ取得

$dbh->selectrow_array($sql);

・データ取得

$dbh->selectrow_array($sql);

詳しくは、DBIリファレンス　
http://www.rfs.jp/sitebuilder/perl/dbi/05.html