for ($object1,$object2,$object3) {
  local($_->{field}) = $val;
}