in reply to Re^2: Creating data structure from multiple pairs of information
in thread Creating data structure from multiple pairs of information

or

 push @{$dog{$dog_type}}, $food_type;

[download]

if more than one food type is possible.
(That is, a hash of array references)
--------------
It's sad that a family can be torn apart by such a such a simple thing as a pack of wild dogs

In Section Seekers of Perl Wisdom