爲什麼Perl的DBI無法連接到我編目的DB2數據庫？

Question

我已經下載了IBM DBI包，包括文檔中指定的程序中的所有包。我已經編目數據庫，並可以通過命令行連接到它，但我的DBI連接失敗：

$dbh = DBI->connect ("dbi:DB2:warehou1", user, pass) or die "Can't connect to sample database: $DBI::errstr"; 

Can't connect to sample database: [IBM][CLI Driver] SQL1031N The database directory cannot be found on the indicated file system. SQLSTATE=58031 

Answer 1

考慮使用full connection string時DBI無法解決一個簡單的數據庫名稱：

my $string = "dbi:DB2:DATABASE=$db; HOSTNAME=$hostname; PORT=$port; PROTOCOL=TCPIP; UID=$user; PWD=$pass;"; 
my $dbh = DBI->connect($string, $user, $pass) || die "Connection failed with error: $DBI::errstr";