s{([()]*)([^()]+)}
 {$c += $1=~y/(// - $1=~y/)//;
  $2 x !$c
 }ge;