簡單的perl mysql查詢不起作用

Question

我已經離開了mysql和perl游戲已有好幾年了，似乎無法做到這一點。 我有一個只有3列的表。 'cnt'就是其中之一。 我想做的就是在'name'上查詢表，看看是否存在名稱。 如果是，我想捕獲'cnt'的值。 該表有一個testName記錄，值為2我手動添加。 運行此腳本時，它返回空。

my $count;
my $pop = qq(SELECT cnt FROM popular WHERE name="testName"); 
my $sth = $dbh->prepare($pop); 
$sth->execute() or die $dbh->errstr; 

my @return; 

while (@return = $sth->fetchrow_array()) { 
   $count = $return[1]; 
} 

print "our return count is $count";

任何人都明白我做錯了嗎？

Answer 1

你可能意味着

$count = $return[0];

Answer 2

根據mysql上的perl doc

fetchrow_arrayref的替代方法。 獲取下一行數據並將其作為包含字段值的列表返回 。 因為你選擇cnt作為返回值，所以@return的大小是1，但你誤解了它是符合你的查詢條件的結果數。不，不是這樣！請仔細閱讀perl doc 。