my $hash = bless(\(0+hex $addr), "B::AV")->object_2svref;