BBSのスパム対策

最近スパムが多くて消すのめんどくなったんで、googleで「BBS　スパム　対策」って検索してスパム対策を施しました。

$urlnum = ($comment =~ s/http/http/ig);
if ($urlnum >= 10) { &er_("URLの多数書き込みは禁止です"); }
if ($comment !~ /(\x82[\x9F-\xF2])|(\x83[\x40-\x96])/) {
&er_("日本語でおｋ");}

URLの10個以上の書き込みを禁止っていうのと、日本語なしのメッセージを禁止というスクリプトですけど、まあこれで減るでしょう（たぶん
思ったより簡単だった。最初からこうすればよかったのか・・・・・（泣き