sub getRef { my $self = shift; $_ and ref $_ and $_ = $self->getNodeById($_) for @_; ref shift; }