sub my_func
{
  my $params = shift;

  print "Message received: " . $params->{message};
  if ($params->{newline}) { print "\n" }
}

# good
my_func( { message => "Hello, world!" } );

# "Error: Not a Hash reference"
my_func( message => "Hello, world!" );