sub get_me_a_drink($drink_name) {
  if ($drink_name eq 'soda' or $drink_name eq 'beer') {
     # go to fridge
     # open fridge door
     # get drink
     return $drink
  }
  elsif ($drink_name eq 'coffee' or $drink_name eq 'tea') {
     # get water
     # boil water
     # mix ingredients
     return $drink
  }
  die "Can't make this drink";
}