my $hash_ref = { a => 1 , b => 2 , } ; print "$$hash_ref{a}\n" ; print "$$hash_ref{b}\n" ; #### my $hash_ref = { a => 1 , b => 2 , } ; local(*hash) ; *hash = $hash_ref ; print "$hash{a}\n" ; print "$hash{b}\n" ;