Select Code to Download

    %HoH = (
    flintstones => {
...
                  kid => [ "george", "jane", "elroy" ],
    },
  );

 $HOH{$key}{"name"} = $value;
  push(@{$HOH{$key}{"price"}}, $value2);