So what is the (pertinent) code you have so far and what is the specific problem you are having? What does the code look like that will use the HoH?

A very short script that takes the input data you've shown and that demonstrates what you want to achieve will help us a lot in understanding what the nature of you problem is and where you are in your Perl journey so we can give the best advice.