my %h1 = (defined $_[0] and ref $_[0]) ? %{ $_[0] } : ();