mysql - Perl で MySQL データベースを読み取る方法

Question

私はPerlの初心者です。SQL ステートメントは正しく機能していますが、Perl を使用して SQL を実行し、結果をファイルに出力したいと考えています。非常に基本的なテンプレート (データベースへの接続から開始) を提供できる専門家はいますか?

Answer 1

use DBI;
my $DBH=DBI->connect("DBI:mysql:db:host","login","pass");
my $sth=$DBH->prepare("query");
$sth->execute();
while (my @row=$sth->fetchrow_array)
{
  print $row[0]."\n";
}
$sth->finish;

Answer 2

これは良いチュートリアルです（多くのチュートリアルの1つ）：

• http://perl.about.com/od/perltutorials/a/perlmysql.htm

次の例があります。

use DBI;
 $dbh = DBI->connect('dbi:mysql:perltest','root','password')
   or die "Connection Error: $DBI::errstr\n";
 $sql = "select * from samples";
 $sth = $dbh->prepare($sql);
 $sth->execute
   or die "SQL Error: $DBI::errstr\n";
 while (@row = $sth->fetchrow_array) {
   print "@row\n";
 } 

Answer 3

データベースと対話するための標準 Perl ライブラリはDBIです。これには、概要に豊富な例と、あなたが求めているステップ スルー ガイドがあります。

ORM の通常の選択はDBIx::Classで、これには紹介があります。