Yomi-searchスパム登録対策

yomi-searchの【Ver4.22】のスパム登録対策です。

regist_ys.cgi　737行目前後：

この部分を
sub act_regist{

以下に書き換え
sub act_regist{
unless($FORM{Ninsho} =￣ /^check_ok!$/i){
$FORM{Ninsho} =’認証キーが違います’;
&preview;exit;
}

regist_new.html　135行目前後：

この部分を
<!–追加して欲しいカテゴリ–>
<li>【追加して欲しいカテゴリ】<font color=red>$EST_reg{Fadd_kt}</font>
<ul>※今後、新設した方が良いと思うカテゴリがあればご提案ください<br>
※全角<b>$EST_reg{Madd_kt}</b>文字以内<br>
<input type=text name=Fadd_kt value=”$FORM{Fadd_kt}” size=60>
</ul><br><br>
<!–HTML–>

以下に書き換え
<!–追加して欲しいカテゴリ–>
<li>【追加して欲しいカテゴリ】<font color=red>$EST_reg{Fadd_kt}</font>
<ul>※今後、新設した方が良いと思うカテゴリがあればご提案ください<br>
※全角<b>$EST_reg{Madd_kt}</b>文字以内<br>
<input type=text name=Fadd_kt value=”$FORM{Fadd_kt}” size=60>
</ul><br><br>

<li>【確認キーをお願いします】<font color=red>$EST_reg{Fadd_kt}</font>
<ul>スパム登録防止のため、以下を記号を含めそのままご入力ください。
<br><br><b>check_ok!</b><br>
<input type=text name=”Ninsho” value=”$FORM{Ninsho}” size=60>
</ul><br><br>
<!–HTML–>

regist_new_preview.html　132行目前後：

この部分を
<!–追加して欲しいカテゴリ–>
<li>【追加して欲しいカテゴリ】<font color=red>$EST_reg{Fadd_kt}</font>
<input type=hidden name=Fadd_kt value=”$FORM{Fadd_kt}”>
<ul>$FORM{Fadd_kt}
</ul><br>

<!–HTML–>

以下に書き換え
<!–追加して欲しいカテゴリ–>
<li>【追加して欲しいカテゴリ】<font color=red>$EST_reg{Fadd_kt}</font>
<input type=hidden name=Fadd_kt value=”$FORM{Fadd_kt}”>
<ul>$FORM{Fadd_kt}
</ul><br>
<li>【認証キー】<font color=red>$EST_reg{Fadd_kt}</font>
<ul>
<input type=text name=”Ninsho” value=”$FORM{Ninsho}” size=60>
</ul><br><br>
<!–HTML–>