$VAR1 = {
          'shared' => \'true',
          'parents' => [
                         {
                           'isRoot' => do{my $o}
                         }
                       ]
        };
$VAR1->{'parents'}[0]{'isRoot'} = $VAR1->{'shared'};