perl - 为什么我使用 Perl 的 DBI->connect 会无声无息地失败？

Question

为什么这段代码会默默地失败？我如何让它准确地显示 SQL 错误是什么？

$dbh=DBI->connect($db_name,$db_user,$db_pass);

我将代码修改为如下所示:

$dbh=DBI->connect($db_name,$db_user,$db_pass)
    or die("could not connect to db: $db_name");

而不是允许我使用 $dbh未分配，它将按预期失败，但它并没有告诉我它失败的确切原因。 $db_name 的值等等，就我所见，都设置了有效值。

我知道真正的错误(MySQL 服务器实际上没有运行)但为了将来引用，我希望看到真正的错误，以防我导致身份验证失败。

Answer 1

你不明白为什么 connect失败是因为你没有做 DBI告诉你做。错误将在 $DBI::errstr多变的:

$dbh = DBI->connect($data_source, $username, $password)
     or die $DBI::errstr;

确保阅读有关要使用的任何函数或方法的文档。 :)