이 DBI/MySQL 쿼리에 대한 출력이 표시되지 않는 이유는 무엇입니까?

Question

다음 코드를 Perl로 작성했습니다. 나는

#!C:\perl64\bin\perl.exe -wT 
use strict; 
use warnings; 
use DBI; 
print "Content-type: text/html \n\n"; 

# MYSQL CONFIG VARIABLES 
my $driver  = "mysql"; 
my $database = "test555"; 
my $tablename3 = "test77"; 

my $user = "root"; 
my $pw = "root"; 

# PERL MYSQL CONNECT() 
my $dbh = DBI->connect("DBI:$driver:$database", $user, $pw,); 

my $sth = $dbh->prepare(" 
     SELECT * 
      FROM t6 
     WHERE paragraph='PWE1234' 
    "); 

$sth->execute(); 
#$dbh->disconnect; 
#exit 0; 

프로그램이 $dbh->disconnect에 도달 윈도우 7에 대한 ActivePerl의 5.14이 시스템은 오류를 던지고있다; 그러므로 그것을 주석 처리했다. 내가 그걸 주석으로 말할 때, 시스템은 어떤 에러도 던지지 않고 있지만 출력을 얻지 못한다.

이 쿼리에 대한 결과가 있으므로 MySQL을 사용하여 한 번만 확인했습니다.

Answer 1

출력을 만들 코드가 없으므로 출력이 없습니다.

execute을 호출 한 후 fetchsomething methods 중 하나를 호출하고 다시 가져온 데이터 구조로 작업해야합니다.