my %hash : shared = (); #### $hash{foo} = {}; #### $hash{foo} = shared_clone({}); #### my %tmp : shared = (); $hash{foo} = \%tmp;