joinまたはdb_connect.pl行の文字列で初期化されていない値$ no_issue [0]の使用146

Question

配列からデータを読み込み、2列をチェックしようとしています。私は以下の私のコードを与えているの参加や db_connect.plライン146

で文字列に[0]初期化されていない値$ no_issueの

使用のようなエラーを取得していますことをやっている間、アレイ、 ：

while (my @row = $processed_sql->fetchrow_array) 
     { 
      #print "sq_no: $row[0] hie_key:$row[1] today: $row[2] table_name: $row[3] batch_id: $row[4] table_count: $row[5] pre_count: $row[6]\n"; 
     ############################################################ 
     my $table_name = $row[3]; 
     my $batch_id = $row[4]; 
     my $table_count = $row[5]; 
     my $pre_count=$row[6]; 
     our @no_issue; 
     #my $nvalue; 

     #print "$table_name,$table_count\n"; 

    if($table_count >= $pre_count) 

    { 

     push (@no_issue,$_); 

     **print "value is greater @no_issue \n";** 
    } 
    else 
    { 
     print "jkdlkjfa\n"; 
    } 

    } 

Answer 1

問題は、あなたが、アレイ@no_issueに$_を推進している、ここで

push (@no_issue, $_); 

print "value is greater @no_issue \n"; 

ですが、あなたはundefを押した後、それを印刷しようとすると、に上昇を与えている$_を設定し、何ら上記のコードはありません初期化されていない値の使用エラー

この配列にどのような値が必要なのかはわかりませんが、おそらく@rowの要素の1つですか？