[過去ログ]
【Project peko】2ch特化型サーバ・ロケーション構築作戦 Part16 (1001レス)
【Project peko】2ch特化型サーバ・ロケーション構築作戦 Part16 http://qb5.5ch.net/test/read.cgi/operate/1102087698/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
868: 未承諾やや酩酊※ ◆TWARamEjuA [sage] 05/01/22 21:21:10 ID:oSftVaKP0 こんな感じになるかとー 2) Rock54 サブルーチン sub BBXcheck { my ($GB) = @_; #以下の板はするー if($GB->{FORM}->{'bbs'} eq "sec2chd"){return 0;} if($GB->{FORM}->{'bbs'} eq "ad"){return 0;} #★はスルー if($GB->{FORM}->{'FROM'} =~ /★$/){return 0;} #●はスルー #if($GB->{MARU}){return 0;} #広告かな? my $NG_word = &IsKoukoku($GB); if($NG_word eq ''){return 0;} # それぞれの値を取り出したいときは、以下のようにデリファレンスすれば・・・ my @NG_word_status = @{$NG_word}; # このようにそれぞれに値が代入されます。 # $NG_word_status[0] には規制文字列 [Shift_JIS] # $NG_word_status[1] には MD5 値 # $NG_word_status[2] には フラグ ※つづく(改行大杉(滂沱)) http://qb5.5ch.net/test/read.cgi/operate/1102087698/868
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 133 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.009s