$obj->get_set( 'name' ) = 'Limbic';

##</code><code>##

$obj->name = 'Limbic';

##</code><code>##

$dept->Positions("manager") = "bill";
print $dept->People("bill")."\n";
#  manager