Select Code to Download

for my $index2 (0..$#productarray)
...
            'polystyrene' => '1',
            },

foreach my $ref (keys %Prod){
    my $hash_ref = $results{$ref};
...
    $totaltype{$ofHash}++;
    }
}