my $temp= $obj->Prop;
$obj= $newValue;
...
$obj->Prop= $temp;