my $hashref = {}; test( eins => 1, zwei => 2, $hashref ); sub test { my (%hash,$hashref) = @_; }