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 …