Perl의 DBI -> connect 사용이 자동으로 실패하는 이유는 무엇입니까?

Question

이 코드가 자동으로 실패하는 이유는 무엇입니까? SQL 오류가 무엇인지 정확하게 알려주려면 어떻게해야합니까?

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

나는 같이하는 코드를 수정 : 나 대신이 지정되지 않은 $dbh을 사용할 수 있도록의, 예상대로 실패 할 것이다, 그러나 그것은 실패 정확히 이유를 말하지 않는

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

. $db_name 등의 값은 모두 내가 볼 수있는 한 유효한 값으로 설정됩니다.

나는 실제 오류 (MySQL 서버가 실제로 실행되고 있지 않음)를 알고 있지만 나중에 참조 할 경우 예를 들어 인증 실패의 원인이되는 경우 진정한 오류를보고 싶습니다.

Answer 1

connect이 실패한 이유는 보이지 않습니다. DBI에 표시 할 작업을 수행하고 있지 않기 때문입니다. 이 오류는 $DBI::errstr 변수에있을 것입니다 :

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

하면 사용하려는 어떤 기능이나 방법에 대한 설명서를 참조하십시오. :)

Answer 2

아하는 오류가 $DBI::errstr에 저장됩니다, 그래서 나는 그렇게처럼 내 코드를 수정할 수 있습니다

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

이 문서에 따르면,이 디자인에 의해 자동으로 실패합니다.

Answer 3

연결시 옵션으로 RaiseError => 1을 전달하면 오류가 발생하면 스크립트가 종료됩니다. 내 Perl 상점의 표준 구성은 다음과 같습니다.

{ 
    RaiseError => 1, 
    PrintError => 0, 
    AutoCommit => 1, 
    mysql_auto_reconnect => 1, 
} 

Answer 4

'or'은 구문 오류입니다. 나열된 코드가 전혀 실행되지 않아야합니다.

당신이 원하는 : or die... 원래 문으로 새 문장의 일부입니다

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

하는 것으로.

Answer 5

$ 값을 포함 해보세요! 너의 죽음의 메시지에.

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

$! in perldoc perlvar을 참조하십시오.

Answer 6

여기 내 용도는 rjh's answer입니다. 나는 내가 die 접근 방식을 통해이 선호 생각하지만, 확실하지 아직 ...

$dbh = DBI->connect($data_source, $username, $password, { RaiseError => 1 });