Embedded Objects – Refresh Operations

• 100 my $obj=thaw($res->{USER});

• 101 %{$self}=$obj->_ihash;

• 102 $self->{VALID}=1;

• …

• 26 sub _ihash {

• 27 return %{$_[0]};

• 28 }