的Perl DBI的MySQL更新

Question

我想知道如何可以從下面的Perl代碼段打印結果：

$sth = $dbh->prepare("SELECT * FROM table_name"); 
    $sth->execute(); 

我倒要看看你會看到什麼，如果你輸入「SELECT * FROM表名;進入MySQL的和有整個關係顯示出來。有沒有從$某物返回值可以在被循環並打印出來？

Answer 1

# BIND TABLE COLUMNS TO VARIABLES 
$sth->bind_columns(undef, \$id, \$product, \$quantity); 

# LOOP THROUGH RESULTS 
while($sth->fetch()) { 
    print "$id, $product, $quantity <br />"; 
}