sub getRef { my $self=shift; for (@_) { next if ref $_ or !$_; $_=$self->getNodeById($_); } ref shift; }