my %hash1=%{$_[0]}; # oder my %hash1=%{scalar shift};