my $objREF = shift;
print $$objREF;

##</code><code>##

return \%objREF;

##</code><code>##

print ${$objREF->{poker}}