ptr и спам (покритикуйте)

[ViktorichZ]

обратил внимание что идёт куча спама с хостов вида ppp-124-122-143-112.revip2.asianet.co.th и прочие, в которых содержится ip в понятном виде, существует ptr, отправитель,решил бороться следующим образом...
в exim
........

Код: Выделить всё

perl_startup = do '/etc/exim/ip.pl'
...........

                deny    message         = spamer ($sender_host_name)
                            set acl_m1  = ${perl{testip}}
                            condition   = ${if eq{$acl_m1}{1}{yes}{no}}

и ip.pl

Код: Выделить всё

#!/usr/bin/perl

#print &testip;
sub testip {
    my $incam;
    $incam = Exim::expand_string('$sender_host_name');
    if(($incam=~/.\d{1,3}\-\d{1,3}\-\d{1,3}\-\d{1,3}./g or $incam=~/.\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}./g)){
    # and $incam !~/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/g) {
        return 1;
        }
        else {
        return 0;
        }
}

[Хостинг HostFood.ru]

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

[gruy]

Сам использую блокировку с таких адресов, плюс еще адреса с большим количеством цифр подряд:

Код: Выделить всё

# 82.158.219.171.dyn.user.ono.com
deny  message                         = Dynamic address. Stop.
      condition                       = ${if match{$sender_host_name} {\N^\S+\d+\.\d+\.\d+\S+\N} {yes}{no}}

# a81-84-43-217.cpe.netcabo.pt, 83-65-12-130.treustrasse.xdsl-line.inode.at
# static-7-253-225-77.ipcom.comunitel.net
deny  message                         = Dynamic address. Stop.
      condition                       = ${if match{$sender_host_name} {\N^\S+\d+\-\d+\-\d+\S+\N} {yes}{no}}

# cp833142-a.tilbu1.nb.home.nl, inet20908ni-2.eranet.pl
# home-313021.b.astral.ro, dsl.dynamic8597139153.ttnet.net.tr
deny  message                         = Dynamic address. Stop.
      condition                       = ${if match{$sender_host_name} {\N^\D+\d{5,}\D+\N} {yes}{no}}

Только проверяю не на 4, а только на 3 октета, т.к. попадались и такие имена.