One rbl per line.

bon · Dec 23, 2013 · e1598c8 · e1598c8
1 parent 870a3e6
commit e1598c8
Showing 1 changed file with 109 additions and 2 deletions.
diff --git a/check-rbl.pl b/check-rbl.pl
@@ -36,7 +36,114 @@
 ####
 # RBL
 ####
-my @rbl=('b.barracudacentral.org','cbl.abuseat.org','dnsbl.invaluement.com','http.dnsbl.sorbs.net','misc.dnsbl.sorbs.net','socks.dnsbl.sorbs.net','web.dnsbl.sorbs.net','dnsbl-1.uceprotect.net','dnsbl-3.uceprotect.net','sbl.spamhaus.org','zen.spamhaus.org','psbl.surriel.com','dnsbl.njabl.org','rbl.spamlab.com','ircbl.ahbl.org','noptr.spamrats.com','cbl.anti-spam.org.cn','dnsbl.inps.de','httpbl.abuse.ch','korea.services.net','virus.rbl.jp','wormrbl.imp.ch','rbl.suresupport.com','ips.backscatterer.org','opm.tornevall.org','multi.surbl.org','tor.dan.me.uk','relays.mail-abuse.org','rbl-plus.mail-abuse.org','access.redhawk.org','rbl.interserver.net','bogons.cymru.com','bl.spamcop.net','dnsbl.sorbs.net','dul.dnsbl.sorbs.net','smtp.dnsbl.sorbs.net','spam.dnsbl.sorbs.net','zombie.dnsbl.sorbs.net','dnsbl-2.uceprotect.net','pbl.spamhaus.org','xbl.spamhaus.org','bl.spamcannibal.org','ubl.unsubscore.com','combined.njabl.org','dnsbl.ahbl.org','dyna.spamrats.com','spam.spamrats.com','cdl.anti-spam.org.cn','drone.abuse.ch','dul.ru','short.rbl.jp','spamrbl.imp.ch','virbl.bit.nl','dsn.rfc-ignorant.org','dsn.rfc-ignorant.org','netblock.pedantic.org','ix.dnsbl.manitu.net','rbl.efnetrbl.org','blackholes.mail-abuse.org','dnsbl.dronebl.org','db.wpbl.info','query.senderbase.org','bl.emailbasura.org','combined.rbl.msrbl.net','multi.uribl.com','black.uribl.com','cblless.anti-spam.org.cn','cblplus.anti-spam.org.cn','blackholes.five-ten-sg.com','sorbs.dnsbl.net.au','rmst.dnsbl.net.au','dnsbl.kempt.net','blacklist.woody.ch','rot.blackhole.cantv.net','virus.rbl.msrbl.net','phishing.rbl.msrbl.net','images.rbl.msrbl.net','spam.rbl.msrbl.net','spamlist.or.kr','dnsbl.abuse.ch','bl.deadbeef.com','ricn.dnsbl.net.au','forbidden.icm.edu.pl','probes.dnsbl.net.au','ubl.lashback.com','ksi.dnsbl.net.au','uribl.swinog.ch','bsb.spamlookup.net','dob.sibl.support-intelligence.net','url.rbl.jp','dyndns.rbl.jp','omrs.dnsbl.net.au','osrs.dnsbl.net.au','orvedb.aupads.org','relays.nether.net','relays.bl.gweep.ca','relays.bl.kundenserver.de','dialups.mail-abuse.org','rdts.dnsbl.net.au','duinv.aupads.org','pool.dnsbl.solid.net','dynablock.sorbs.net','residential.block.transip.nl','dynip.rothen.com','dul.blackhole.cantv.net','mail.people.it','blacklist.sci.kun.nl','all.spamblock.unit.liu.se');
+my @rbl=('b.barracudacentral.org',
+         'cbl.abuseat.org',
+         'dnsbl.invaluement.com',
+         'http.dnsbl.sorbs.net',
+         'misc.dnsbl.sorbs.net',
+         'socks.dnsbl.sorbs.net',
+         'web.dnsbl.sorbs.net',
+         'dnsbl-1.uceprotect.net',
+         'dnsbl-3.uceprotect.net',
+         'sbl.spamhaus.org',
+         'zen.spamhaus.org',
+         'psbl.surriel.com',
+         'dnsbl.njabl.org',
+         'rbl.spamlab.com',
+         'ircbl.ahbl.org',
+         'noptr.spamrats.com',
+         'cbl.anti-spam.org.cn',
+         'dnsbl.inps.de',
+         'httpbl.abuse.ch',
+         'korea.services.net',
+         'virus.rbl.jp',
+         'wormrbl.imp.ch',
+         'rbl.suresupport.com',
+         'ips.backscatterer.org',
+         'opm.tornevall.org',
+         'multi.surbl.org',
+         'tor.dan.me.uk',
+         'relays.mail-abuse.org',
+         'rbl-plus.mail-abuse.org',
+         'access.redhawk.org',
+         'rbl.interserver.net',
+         'bogons.cymru.com',
+         'bl.spamcop.net',
+         'dnsbl.sorbs.net',
+         'dul.dnsbl.sorbs.net',
+         'smtp.dnsbl.sorbs.net',
+         'spam.dnsbl.sorbs.net',
+         'zombie.dnsbl.sorbs.net',
+         'dnsbl-2.uceprotect.net',
+         'pbl.spamhaus.org',
+         'xbl.spamhaus.org',
+         'bl.spamcannibal.org',
+         'ubl.unsubscore.com',
+         'combined.njabl.org',
+         'dnsbl.ahbl.org',
+         'dyna.spamrats.com',
+         'spam.spamrats.com',
+         'cdl.anti-spam.org.cn',
+         'drone.abuse.ch',
+         'dul.ru',
+         'short.rbl.jp',
+         'spamrbl.imp.ch',
+         'virbl.bit.nl',
+         'dsn.rfc-ignorant.org',
+         'dsn.rfc-ignorant.org',
+         'netblock.pedantic.org',
+         'ix.dnsbl.manitu.net',
+         'rbl.efnetrbl.org',
+         'blackholes.mail-abuse.org',
+         'dnsbl.dronebl.org',
+         'db.wpbl.info',
+         'query.senderbase.org',
+         'bl.emailbasura.org',
+         'combined.rbl.msrbl.net',
+         'multi.uribl.com',
+         'black.uribl.com',
+         'cblless.anti-spam.org.cn',
+         'cblplus.anti-spam.org.cn',
+         'blackholes.five-ten-sg.com',
+         'sorbs.dnsbl.net.au',
+         'rmst.dnsbl.net.au',
+         'dnsbl.kempt.net',
+         'blacklist.woody.ch',
+         'rot.blackhole.cantv.net',
+         'virus.rbl.msrbl.net',
+         'phishing.rbl.msrbl.net',
+         'images.rbl.msrbl.net',
+         'spam.rbl.msrbl.net',
+         'spamlist.or.kr',
+         'dnsbl.abuse.ch',
+         'bl.deadbeef.com',
+         'ricn.dnsbl.net.au',
+         'forbidden.icm.edu.pl',
+         'probes.dnsbl.net.au',
+         'ubl.lashback.com',
+         'ksi.dnsbl.net.au',
+         'uribl.swinog.ch',
+         'bsb.spamlookup.net',
+         'dob.sibl.support-intelligence.net',
+         'url.rbl.jp',
+         'dyndns.rbl.jp',
+         'omrs.dnsbl.net.au',
+         'osrs.dnsbl.net.au',
+         'orvedb.aupads.org',
+         'relays.nether.net',
+         'relays.bl.gweep.ca',
+         'relays.bl.kundenserver.de',
+         'dialups.mail-abuse.org',
+         'rdts.dnsbl.net.au',
+         'duinv.aupads.org',
+         'pool.dnsbl.solid.net',
+         'dynablock.sorbs.net',
+         'residential.block.transip.nl',
+         'dynip.rothen.com',
+         'dul.blackhole.cantv.net',
+         'mail.people.it',
+         'blacklist.sci.kun.nl',
+         'all.spamblock.unit.liu.se');
 
 ####
 # VARS
@@ -118,7 +225,7 @@ sub check_rbl {
 if($ip) {
 
 	if($ip->size() > 1) {
-	
+
 		++$ip;
 		do {
 			my $ip2 = new Net::IP($ip->ip());