if(myfunction(debug=>1,var=>$val)){...}

sub myfunction{
  my @params=@_;
  if($params{debug}){...}
}