in reply to Continuing from "Turning foreach into map?" - perlreftut and References
I'm not sure I follow. Do you want to create a two-dimensional look-up table, so that you could look up, say, 1 and 4 (or 'proteins' and 'Fruit') and read off 'No'? If this is the case, then I don't see why you would need to specify the members of each group ('protein', 'Fruit', etc.).
the lowliest monk
In Section
Seekers of Perl Wisdom