{
  my $tree;

  sub get_tree {
    return $tree;
  };
};

##</code><code>##

{
  my $tree;

  sub get_tree {
    return $tree;
  };

  sub release_tree {
    undef $tree;
  };
};