WebService::Livedoor::SpamChampuru::DNSBL - Perl interface of SpamChampuru DNSBL WebService
Checks if an IP has recently been used for sending spams, via spam-champuru (spam-champloo) DNSBL service (beta).
Spam-champuru DNSBL holds list of IPs which have been reported as sources of spams by various services running at livedoor.com.
The result may not be suitable for filtering mails, as this service is mainly intended for checking blog comments/trackbacks or bbs posts.
* livedoor.com is not responsible for appropriateness of the result, nor for any harms caused by the use of the result.
* The service is in a beta status, and may at any time become unavailable.
use WebService::Livedoor::SpamChampuru::DNSBL; my $dnsbl = WebService::Livedoor::SpamChampuru::DNSBL->new(timeout => 1); my $res = $dnsbl->lookup($ip_addr);
Creates an WebService::Livedoor::SpamChampuru::DNSBL instance.
$dnsbl = WebService::Livedoor::SpamChampuru::DNSBL->new(timeout => $timeout, [nameservers => \@nameservers]);
Sends a DNS query to SpamChampuru DNSBL server and checks if $ip_addr is classified as a source of spam.
lookup returns 1 for SPAM, 0 for HAM.
my $res = $dnsbl->lookup($ip_addr);
lookup('192.0.2.1') should always return 1 (spam), as SpamChampuru DNSBL uses this IP as a test IP.
<k-kaneko at livedoor.jp>
http://spam-champuru.livedoor.com/dnsbl/ (Japanese text only)
Copyright 2008 livedoor Co., Ltd., all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.