%hash = (
    fruit    =>  apple,
    sandwich =>  hamburger,
    drink    =>  bubbly,
);
print "$hash{fruit}\n";