arrays - 配列の長さチェック時の未初期化値の警告

Question

次のコードがあります。

my @product_access = @{ $products->{ $PosDetails->{"SalProductRef"}->[$i]}
                      {DetAccess_tab} };

if ( @product_access == 1 )
{
    $revenue{ $products->{ $PosDetails->{"SalProductRef"}->[$i] }{DetFinanceCategory} }
            {"Total"} += $PosDetails->{"SalSubTotal"}->[$i];
}

配列の長さを確認すると、Use of uninitialized value in concatenation警告が表示されます。その行でその警告が表示されるのは少し奇妙に思えます。この警告が表示されるのはなぜですか?

Answer 1

perl の一部のバージョンでは、if 行の elsif 句でいくつかの警告が報告されます。私はそれがここに当てはまると確信しています。