mysub(\%hash); sub mysub { my $params = shift; my %paramhash = %$params; }