Как настроить тестирование чтобы свежие IP адреса прежде чем вносить в конфиг сервера предварительно проверить блокируется ли он уже или нет?Банальный поиск по списку.
Есть ли утилита или онлайн сервис куда можно загрузить свой Блэклист по маскам и список IP и посмотреть каким правилом оно блокируется?Это как?
Есть ли утилита или онлайн сервис куда можно загрузить свой Блэклист по маскам и список IP и посмотреть каким правилом оно блокируется?
#!/usr/bin/perl
use 5.010;
use strict;
use warnings;
use NetAddr::IP;
my @list = ('144.76.0.0/16', '144.76.118.82', '144.76.119.28', '144.76.67.0/24', '144.75.0.41');
my @result;
foreach my $ip (@list) {
push(@result, NetAddr::IP->new($ip));
}
@result = NetAddr::IP::compact(@result);
foreach my $ip (@result) {
say $ip->cidr;
}
144.75.0.41/32
144.76.0.0/16