このスレッドはアーカイブ化された過去ログです。
このスレッドはアーカイブ化された過去ログです。
人気のスレッド
既婚女性
227
9420.2
2279420.2既婚女性10017307.7
10017307.7乃木坂46235896.7
235896.7乃木坂465873845.1
5873845.1
ニュース速報+5123516.2
5123516.2乃木坂46721760.3
721760.3
ニュース速報+101356.4
101356.4市況14571267.8
4571267.8
ニュース速報+1511224.1
1511224.1乃木坂462721206.4
2721206.4もっと見る
BBQ
http://bbq.uso800.net/
組み込み例
#################################################################################################
#
#################################################################################################
sub checkProxyList
{
my $RADDR = $ENV{'REMOTE_ADDR'};
$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.niku.2ch.net";
my $addr = join('.', unpack('C*', gethostbyname($query_addr)));
if ($addr eq '127.0.0.2')
{
DispError("ＥＲＲＯＲ！","公開ＰＲＯＸＹからの投稿は受け付けていません！！(1)");
}
return 0;
}
#################################################################################################
#
#################################################################################################