Look at the code. Think about the code. Think about the data structure. Examine the result from Dump. You have the answer already and it is time for you to do some thinking and just a little work. You can't expect to be spoon fed answers to every problem you have forever.

perllol and perlref will help.