sub add_ingredient {
  my $args = shift;

  if ( @{$args}{ qw/name unit quantity/ } ) {
    print "All elements exist\n"
  } else {
    print "Hey some information is missing \n";
  }
}

add_ingredient({                  
  name => "carrot",
  unit => "lb",
}); #output: Hey some information is missing


add_ingredient({                  
  quantity => 1.0,
}); #output:  All elements exist