sub brew_hot_drink {
  my $ingredients = shift;
  return mix( $ingredients, boil(get_water()));
}