如何在Perl中讀取MySQL數據庫

Question

我是一名Perl初學者。我現在有一個正常工作的SQL語句，但我想用Perl來執行SQL並將結果輸出到文件。任何專家都可以提供一個非常基本的模板（從連接到數據庫開始）？

Answer 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 2

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 3

標準Perl庫進行數據庫交互是DBI在大綱中有大量的例子g與step through guide這就是你要求的。

ORM的通常選擇是DBIx::Class其中有an introduction。