my %IPsinrange = map {$_=>1} @IPsinrange;
for my $host_obj ($np->all_hosts()) {
  next unless $IPsinrange{$host_obj->ipv4_addr()};
  for my $port (@ports) {