in reply to Get one element from anonymous hash

Your data structure would probably be clearer to you if you used Dumper on a reference to the data:
print Dumper \@data;