&test(\%haha) 

sub test
{
my $ref = @_;

print "hashname aus Referenz" ????
}