tie($corba_hash, %$hash);
  return $corba_hash; # return to the client

##</code><code>##

 
  bless($hash, 'CORBAHash');
  $ORB->activate($hash); # register object with the ORB
  return $hash; # return to the client

##</code><code>##

  tie(%hash, 'CORBAHash');