5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

【Web】 掲示板AA撲滅 【Prog】

1 :nobodyさん:03/02/12 15:46 ID:???
頑張ってAAかどうか判定するソースを書こうじゃないか!

PerlかPHPとか一般的なやつで。

2 :nobodyさん:03/02/12 15:54 ID:???
>>1
で、取りあえずお前が考えたアルゴリズムを聞きたい。

  ∩∩
 (゜x゜ )○

3 :1:03/02/12 17:25 ID:???
Perl

/[\s:;]{10,}/
マッチしたらAAっていうのは?

4 :nobodyさん:03/02/12 17:31 ID:???
>>3
>>2のかわいいむぅタンが消えないが。

むぅ?

  ∩∩
 (゜x゜ )○

5 :nobodyさん:03/02/12 22:01 ID:???
m/(?:\n(?: | )+[^\n]+){2,}/

6 :nobodyさん:03/02/12 22:27 ID:???
まず、アスキーアートと日本語の文章の違いとして、
同じ文字やパターンが数多く繰り返されることがあると思うが、どうよ。
そういうところから考えると解けるようなきが汁。

あとは辞書ファイルでやるのが妥当かと……


7 :nobodyさん:03/02/12 23:07 ID:???

@kigo=("\","~","∧","Д","д","´","`","ゝ","⊂","≡","⌒","▼","≧");
foreach(@kigo){
if ($com=~/.*$_.*$_.*$_.*$_/){$com="(AA省略/<a href=\"..\/..\/res.cgi?$two$three$datprint2\">見る</a>)";}
}

8 :nobodyさん:03/02/13 00:20 ID:???
なんでも、すゝきさん所の次男坊が風邪引いたらしいぞ。


9 :nobodyさん:03/02/13 11:55 ID:Ut9Jca7L
>>7
って重そうなんだが、
どれが軽いんだろ

10 :nobodyさん:03/02/13 18:53 ID:???
多分、そんな風にやりたいなら、、記号リストの中にあるもので、
合計5個以上マッチしたらAAっていうのにするべきだね。

つまり、

my $count = 0;
my $flag;
foreach (@kigo) {
 $count += $com =~ /\Q$_\E/;
 if ($count >= 5) {
  $flag = 1;
  last;
 }
}
if ($flag) {
 #AAでした。
}

11 :nobodyさん:03/02/13 21:48 ID:vY+9+m5g
顔文字も消えるよ

12 :nobodyさん:03/02/13 21:58 ID:???
>>11
その辺は文字数を見ればなんとかなるんじゃないか?

13 :12:03/02/13 22:08 ID:???
もちろんAAだと認識した文字列の文字数だよ
とりあえず顔文字なら普通は改行ははいらないな

3 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)