$hashref = { fruit => apple, sandwich => hamburger, drink => bubbly,};while(($key, $value) = each(%$hashref)) { print "$key => $value\n";}