DBI を使用すると、Perl で mysql データベースに簡単に接続できます。
コードは次のとおりです:
DBIを使用する
# ターゲット DB に接続します
my $dbh = DBI->connect("DBI:mysql:database=eygle;host=localhost","username","password", {'RaiseError' => 1});
# 1 行を挿入します
my $rows = $dbh->do("INSERT INTO test (id, name) VALUES (1, 'eygle')");
my $sqr = $dbh->prepare("SELECT name FROM test");
$sqr->execute();
while(my $ref = $sqr->fetchrow_hashref()) {
$dbh->切断();
実行結果:
コードは次のとおりです:
www.bkjia.com