Help for this page
$VAR1 = { '99155' => { ... ] } };
for my $outerkey (keys %hash) { for my $innerkey (keys $hash{$outerkey}) { ... push( @{ $hash{$outerkey}{$innerkey} }, @array); } }