《Perl DBI 入門》建立連線

每一種資料庫都有不同的連線方式， 若是想知道特殊用法， 請務必閱讀 DBD 所提供的說明文件。 下面的例子是連線到 DBMaker 的基本方法.

use strict;
use DBI;

my $dbh = DBI->connect( 'dbiBMaker:dbsample',
                        'jerry',
                        'jerrypassword',
                      );
   
上述的 connect 函數用到了三個參數: 資料來源名稱 (data source name, DSN), 使用者名稱和密碼。 其中 DSN 的格式為 dbiriverName:instance. 不過我們要如何知道連線成不成功呢? 首先可以查看 connect 的傳回值，true 代表成功，false 就是代表失敗。 其次，當有錯誤發生時， DBI 會把錯誤訊息存放在 package variable $DBI::errstr 之中。

use strict;
use DBI;

my $dbh = DBI->connect( 'dbiBMaker:dbsample',
                        'jerry',
                        'jerrypassword',
                      )
          || die "Database connection not made: $DBI::errstr";
$dbh->disconnect();
   
結束資料庫連線請使用 disconnect() 函數， 正確地使用可避免錯誤訊息 "Database handle destroyed without explicit disconnect" 的發生.