PINK独自bbs.cgi開発at EROBBSPINK独自bbs.cgi開発 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト50:名無し編集部員 07/04/30 21:28:34 bxY2aBrF そですねー。 で、bbs.cgiの中で処理するので、リンク先は移転したりとかはしないのが 良いと思うのですね。 ガイドライン等も、恒久的にwikiでやるのか、いずれ静的なページに移す気なのか イマイチわからんですし、その辺も聞いてみたい所。 ガイドラインはこっちがいいのかな、 http://deleter.bbspink.com/guideline/ 使い方&注意はどうなんだろう、 http://deleter.bbspink.com/wiki/wiki.cgi?page=%BB%C8%A4%A4%CA%FD%A1%F5%C3%ED%B0%D5%A1%CA%B2%BE%A1%CB とか。 51:特撰キンバエ ◆yuQ9t.UD8o 07/04/30 22:02:53 RvphmUjy >>50 うぃうぃ。 >>49のイメージをいじってみましたよ。 52:Greenday ★ 07/05/04 01:22:41 法人スレッドを、削除依頼板のトップからリンクさせました。 53:名無し編集部員 07/05/04 19:55:49 TD2oW9nJ そんな話はしていません。 54:名無し編集部員 07/07/18 23:59:58 ClVmwVC4 ### 規制処理をしている箇所の最後に挿入 if ( $ENV{'SERVER_NAME'} =~ /bbspink/ ) { require 'pink_kisei.pl'; &pink_kisei($GB); } ### pink_kisei.pl use strict 'vars'; sub pink_kisei { my $GB = $_[0]; # ★●はスルー(添え字と値は何ー?) if ( $GB->{'★●'} ) { return 0; } # BBSPINK用リファレンス変数をグローバルで宣言 # staticなローカル変数って無いんだっけ・・・? use vars qw($PINK); # 最初なら色々読み込み unless ( defined $PINK ){ $PINK = {}; # 規制リストとか(例) $PINK->{'kisei'} = []; open(KISEI, 'kisei.txt'); @{$PINK->{'kisei'}} = <KISEI>; chomp @{$PINK->{'kisei'}}; close KISEI; # 独自規制リストの分だけ同様に繰り返す } # 規制処理 # リスト内を単純に探す if ( grep(/^$GB->{'端末番号とか'}/, @{$PINK->{'kisei'}}) ) { &DispError2($GB, "ERROR!", "ERROR:エラーです!!($GB->{'端末番号とか'})"); } # リスト側の正規表現でマッチング foreach ( @{$PINK->{'kisei'}} ) { next if /^#/; # 例えばIPアドレスで if ( $ENV{'REMOTE_ADDR'} =~ /$_/ ) { &DispError2($GB, "ERROR!", "ERROR:エラーです!!($_)"); } } # 何も無し return 0; } 1; 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch