« 名古屋驛麺通り | トップページ | ファンライド2月号 »

2005/01/20

reject wiki spam パッチfor WalWiki

「# You MAY modify following variables.」に、


my @spamwords = ('51.net','1816.net','gghggh.com'); # ayati add

を追加、
「sub do_write {」の「 # Walrus add [part edit] start」の前に、

# ayati add [reject wiki spam] start
if (&is_wikispam()) {
&print_header($form{mypage});
&print_message($resource{cantchange});
&print_footer($form{mypage});
return;
}
# ayati add [reject wiki spam] end

を追加、
最後近くの「# Walrus add [for debug] end」の後に、

# ayati add [reject wiki spam] start
sub is_wikispam {
foreach my $spamword (@spamwords) {
if ($form{mymsg} =~ /$spamword/) {
return 1;
}
}
return 0;
}
# ayati add [reject wiki spam] end

を追加しました。
ケーキデータベースwikiはこれでしばらく様子見してみよう。

|

« 名古屋驛麺通り | トップページ | ファンライド2月号 »

コメント

さらに、
# ayati add [reject wiki spam] start
sub is_wikispam {
foreach my $spamword (@spamwords) {
if ($form{mymsg} =~ /$spamword/) {
return 1;
}
}
if($form{mymsg} !~ m/[\x80-\xff]/) { # 日本語なかったら
return 1;
} else {
return 0;
}
}
# ayati add [reject wiki spam] end
のようにしてみました。blacklistの管理が面倒そうなので・・・。

投稿: あやち | 2005/01/21 21:28

この記事へのコメントは終了しました。

トラックバック

この記事のトラックバックURL:
http://app.cocolog-nifty.com/t/trackback/69188/2640779

この記事へのトラックバック一覧です: reject wiki spam パッチfor WalWiki:

« 名古屋驛麺通り | トップページ | ファンライド2月号 »