if ($token eq ')') {
  $node = pop @stack;
}