使用perl連接到數據庫

Question

我有一個腳本，我連接到數據庫並嘗試執行sql查詢。 我的代碼是這樣的

use DBI;
$dbh = DBI->connect('Databasename', 'uid','pswd');
my $sth = $dbh->prepare ("select * from Tablename");
$sth->execute();
my @row_ary = $sth->hetshrow_array;
foreach $item (@row_ary)
{
print "$item\n";
}

當我嘗試執行此代碼時，我收到以下錯誤消息

Can't connect to data source 'Databasename' because I can't work out what driver to use (it doesn't seem to contain a 'dbi:driver:' prefix and the DBI_DRIVER env var is not set) at demo.pl line 2

任何人都可以建議我為什么收到這條消息。 執行sql查詢需要做什么配置。

謝謝

Answer 1

DBI非常靈活，它支持多個數據庫服務器（MySQL，Sybase，Oracle等）。 傳遞給DBI-> connect的第一個參數是DSN（數據源名稱），而不是數據庫名稱。 DSN的格式是：

dbi:Driver:databasename

如果您的數據庫是MySQL，您將使用mysql作為驅動程序：

dbi:mysql:databasename

以下是有關DBI的更多信息 。