foreach my $ncall (@{$nref->{parent}}) {
unless ($seen->{$ncall}) {
dbg("recursing from $call -> $ncall") if isdbg('routec');
foreach my $ncall (@{$nref->{parent}}) {
unless ($seen->{$ncall}) {
dbg("recursing from $call -> $ncall") if isdbg('routec');