Since your last three questions all quote (at length!) the same data and (largely) bear on the same issues, perhaps you should:

1. Read Learning Perl or a comparable primer instead of asking the Monks to create a point by point tutorial, ad hoc. (See On asking for help and How do I post a question effectively?)
2. Review the available tutorials on this site
3. Study prior answers for clues on how to answer your current question, notably: use strict; use warnings; insert print (and ADDITIONAL Data::Dumper statements) to help you track what's actually happening in your code; and tell us exactly how you've tried to resolve your problem. That last might give us some further clues in the effort to clear up your blind-spots and misconceptions.

Also noted: questions on this data-set have been posted under two different user names, milan.dalwadi and mak.jordan. You should be aware the PM frowns on the use of multiple-logins (except for the Gods and a very few, rare exceptions)... and that the persistent questions about a single data sample raise questions about whether this is homework, $work or ??.