In addition to the helpful advice already given, a handy debugging tool is Data::Dumper. This can help to get an idea of your array/hash contents at arbitrary points in your code:

print Dumper(\%harry);
[download]

It is also customary to post (small) segments of your data structures here to help us help you.