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