Net::Akismet
NAME Net::Akismet - Perl interface to Akismet - comment and trackback spam fighter SYNOPSIS my $akismet = Net::Akismet->new( KEY => 'secret-baba-API-key', URL => 'http://example.blog.net/', ) or die('Key verification failure!'); my $verdict = $akismet->check( USER_IP => '10.10.10.11', COMMENT_USER_AGENT => 'Mozilla/5.0', COMMENT_CONTENT => 'Run, Lola, Run, the spam will catch you!', COMMENT_AUTHOR
I, newbie » p5-Net-RBLClient
policyサーバを書こうと思ってnet/p5-Net-RBLClientをいじる。mail/p5-Mail-RBLもあるけど、並列に問い合わせしないし、細かいチューニングができない。 #!/usr/bin/perl use warnings; use strict; use Net::RBLClient; my $rbl = Net::RBLClient->new( lists => [ qw{ sbl.spamhaus.org bl.spamcop.net list.dsbl.org xbl.spamhaus.org } ], query_txt => 1, timeout => 5, ); $rbl->lookup('127.0.0.2'); # my @listed_by = $rbl->listed_by; my %listed_hash = $rbl->listed_hash;
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://kevin.scaldeferri.com/dist/writeback_akismet
http://www.bsddiary.net/d/200608.html
