sub add
{
+ my $count = 0;
+
for my $ip (@_) {
# protect against stupid or malicious
next if /^127\./;
next;
}
$ipv4->add_any($ip);
+ ++$count;
++$count4;
} elsif (/:/) {
if ($ipv6->find($ip)) {
next;
}
$ipv6->add_any($ip);
+ ++$count;
++$count6;
LogDbg('DXProt', "DXCIDR: Added IPV6 $ip address");
}
$ipv6->prep_find;
_put($ipv6, 6);
}
+ return $count;
}
sub save