>>754
もう見てないかもしれないが、KENTさんの禁止ワードを追加してみたらどう?
test/bbs.cgiを開いて、場所は適当だけどたとえばrequireの下に$no_wdを追加する。
ここで禁止するワードを指定する。

use strict;
require './jcode.pl';
require './common.pl';

my $no_wd = 'あいうえお,かきくけこ,さしすせそ,たちつてと';

それから入力情報のチェックとSETTING.TXTの設定を読み込むところのあいだあたりに以下を追加する。

#規制ワードチェック
{
my $flg = 0;
foreach ( split(/,/, $no_wd) ) {
if (index("$in{'FROM'} $in{'subject'} $in{'MESSAGE'} $in{'mail'}",$_) >= 0) {
$flg = 1; last;
}
}
if ($flg) { &error("エラー","禁止ワードが含まれています"); }
}

# SETTING.TXTの設定を読み込む

うまくいかなかったらすまぬ