sub appendOQ { my $root = shift or die; # Make this node my $this = $root->addNewChild(, ); # Append sub tree &appendTU($this); return $root; }