$flag += 1 if $ref->here;
$flag += 2 if $ref->conf;
if ($ref->is_node) {
my $ping = int($ref->pingave * 10);
$str .= "^N$flag$call,$ping";
$flag += 1 if $ref->here;
$flag += 2 if $ref->conf;
if ($ref->is_node) {
my $ping = int($ref->pingave * 10);
$str .= "^N$flag$call,$ping";