foreach my $prod (@total_pid) { foreach my $su (@total_sup) { $rowhash{$prod}{$su}{'DATA_S'} = ""; $rowhash{$prod}{$su}{'DATA_F'} = ""; } } foreach my $row (@ym_cty_data) { $rowhash{$row->{PRODUCT_ID}}{$row->{SUPPLIER_ID}}{'DATA_F'} = $row->{VALUE_FE}; $rowhash{$row->{PRODUCT_ID}}{$row->{SUPPLIER_ID}}{'DATA_S'} = $row->{VALUE_SOLID}; }