2 # show a Route::Node thingy
4 # Copyright (c) 2001 Dirk Koopman G1TLH
9 my ($self, $line) = @_;
10 my @list = split /\s+/, $line; # generate a list of callsigns
11 @list = ($self->call) if !@list; # my channel if no callsigns
15 foreach $call (@list) {
17 my $ref = Route::Node::get($call);
19 @out = print_all_fields($self, $ref, "Route::Node Information $call");
21 push @out, "Route::User: $call not found";
23 push @out, "" if @list > 1;