$food = \@array;
print $$food{Corn}; # woops!