sub callFunction {
my $refhash = shift ;
my %hash = %$refhash ;
...
}