SPAM避け

hidden埋め込むのはバージョンアップ時に追従するのが大変なので日本語無ければ蹴る方向に。
mt-comments.cgi

use strict;
use CGI qw(:standard);
if ($ENV{‘REQUEST_METHOD’} eq “POST”) {
my $tck = param(‘text’);
die if($tck ne “” && $tck !~ /[\x80-\xff]/);
}

mt-tb.cgi

use strict;
use CGI qw(:standard);
if ($ENV{‘REQUEST_METHOD’} eq “POST”) {
my $tck = param(‘excerpt’);
die if($tck ne “” && $tck !~ /[\x80-\xff]/);
}

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です


The reCAPTCHA verification period has expired. Please reload the page.