Select Code to Download

for $i (keys(%HoH)) {
    #the name must be kept with the subhash.
    $HoH{$i}{"name"} = $i;
    push @temp_array, $HoH
}