FOX氏の書き置きはこれだけですなぁ
724 名前:FOX ★ 投稿日:03/11/01 18:39 ID:???
sub BBXcheck
{
#以下の板はするー
if($FORM{'bbs'} eq ""){return 0;}
if($FORM{'bbs'} eq ""){return 0;}
#★はスルー
#●はスルー
#$FORM{'MESSAGE'}に投稿された本文が入っている
#広告かな?
if(!&IsKoukoku){return 0;}
my $HHH = $ENV{REMOTE_ADDR};
$HHH =~ s/(\d+)\.(\d+)\.(\d+)\.(\d+)/$4.$3.$2.$1/;
my $AHOST = "$HHH.bbx.2ch.net";
my $SPAM = gethostbyname($AHOST);
if($SPAM)
{
DispError("ERROR!","ERROR:ロックは人生だ。");
}
return 0;
}