perl - Perl dbi: fetchrow_array 制限の結果:

Question

mySQL Workbench で同じ要求を使用すると、結果の数は 41100 です。私のスクリプトでは、数は 1015 です。コードにエラーはありません (表示するために die を使用します)。この違いの原因は何ですか？

# Create the statement 
# select all id in table contacts
$statement = "select distinct contacts.id from $database.contacts"; 

# Prepare and execute the SQL query 
$sqlQuery = $connectGrc->prepare($statement)

# Execute the statement 
$sqlQuery->execute() 

# Make id in array
while($oneId = $sqlQuery->fetchrow_array())
{
    push(@ArrayId,$oneId); 
}

Answer 1

明らかに間違っている点はありません (エラー チェックの欠如と、コメントがプログラム コメントではないことを除いて)。RaiseError をオンにして「use strict;」で接続してみて、他の方法では見られない問題があるかどうかを確認してください。また、結果の 1 列の配列だけが必要で、配列参照で解決できる場合は、便利な selectcol_arrayref() を検討してください。