- push @out, sprintf "%10s $sort $t$ping $obscount %5d %5d $iso $fin $fout $pc92", $call, $pingint, $lastt;
+ $sort = "RBN " if $dxchan->is_rbn;
+ my $ipaddr;
+
+ my $addr = $dxchan->hostname;
+ if ($addr) {
+ $ipaddr = $addr if is_ipaddr($addr);
+ $ipaddr = 'local' if $addr =~ /^127\./ || $addr =~ /^::[0-9a-f]+$/;
+ }
+ $ipaddr = 'ax25' if $dxchan->conn->ax25;
+
+ push @out, sprintf "%10s $sort $t%13s$ping $obscount %5d %5d $iso $fin $fout $pc92 $ipaddr", $call, $uptime ,$pingint, $lastt;