OSDN -- 開發和下載開源軟體
繁體中文翻譯狀態 translation status for zh-tw
  • R/O
  • HTTP
  • SSH
  • HTTPS
Fork

sandbox: 提交

個人用


Commit MetaInfo

修訂19fd0332a394d157dd03558915da35aaaaf532ff (tree)
時間2017-12-07 19:01:18
作者kgsoft <kgsoft@871d...>
Commiterkgsoft

Log Message

FSWiki 3.6.4対応版

Change Summary

差異

--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/Install.pm
@@ -0,0 +1,2017 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）<br>
4+#（comment,bbs,bbs2,bugtrackプラグイン、pcomment,bbsxプラグイン、ページの編集に対応）
5+#
6+##########################################################################################
7+use strict;
8+package plugin::_ex_spam_filter_light::Install;
9+
10+sub install {
11+ my $wiki = shift;
12+
13+ # ↓↓↓フィルタリングを有効にしたいプラグインの行を有効にしてください。（行頭の「#」を削除してください）
14+ use plugin::_ex_spam_filter_light::comment; #commentプラグイン
15+ use plugin::_ex_spam_filter_light::bbs; #bbsプラグイン
16+ use plugin::_ex_spam_filter_light::bugtrack; #bugtrackプラグイン
17+# use plugin::_ex_spam_filter_light::pcomment; #pcommentプラグイン（BugTrack-plugin/82）
18+# use plugin::_ex_spam_filter_light::bbsx; #bbsxプラグイン（BugTrack-plugin/127）
19+ use plugin::_ex_spam_filter_light::core; #ページの編集
20+ #↑↑↑
21+
22+}
23+
24+{
25+
26+my $nValidPhraseNum = 600; # 解析：有効フレーズ数 200〜300程度で十分。多くするほど厳密だがノイズの元にもなる。
27+my $nMaxRangedNum = 3; # 解析：連結文字種数 2,3程度が適当。
28+my $nMinimumPhraseLength = 3; # 解析：最小フレーズ長 3程度が適当。
29+my $nMaxPhraseLength = 20; # 解析：最大フレーズ長 20〜40程度が適当。
30+my $bJudgmentByIllegalCharacter = 0; # 判定：機種依存文字をスパムと判定する(1)／しない(0)。
31+my $fJudgmentByEnglish = 1.0; # 判定：英単語の占める割合でスパムと判定する。(0.0〜1.0, 1.0以上でOFF) 利用することで英文のみの文章をスパム学習させる必要がなくなり、学習効率を大幅に上げることが可能。但し、英文のみのコメントがスパム判定されることになるので注意。
32+my $fJudgmentScore = 0.0; # 判定：判定閾値 負:甘く判定 0：通常 正：厳しく判定 通常は0で十分。厳格なサイトなら0.04辺りを指定、オープンなサイトなら-0.04辺りを指定。
33+my $fJudgmentScore2 = 0.18; # 判定：
34+my $nJudgmentMethod = 2; # 判定：判定方式 2:甘く判定　3:厳しく判定
35+my $fJudgmentScore3 = -0.0001;
36+
37+#--------------------------------------------------------------------------------------------------
38+# 判定
39+#--------------------------------------------------------------------------------------------------
40+sub judgment_text
41+{
42+ my ($text) = @_;
43+
44+ #指定された文章をフレーズ解析
45+ my ($illegal_ch_f, $english_phrase_share, $ref_doc_phrase_freq) = &analysis_text($text);
46+
47+ unless($bJudgmentByIllegalCharacter){
48+ $illegal_ch_f = 0;
49+ }
50+
51+ #フレーズ重みテーブルの読み込み
52+ my (%phrase_bunpu, %wgt);
53+ while(<DATA>){
54+ chomp;
55+ my ($phrase, $freq, $wgt) = split /:/;
56+ $phrase_bunpu{$phrase} = $freq;
57+ my ($wgt0, $wgt1) = split /,/, $wgt;
58+ $wgt{$phrase}[0] = $wgt0 if($wgt0);
59+ $wgt{$phrase}[1] = $wgt1 if($wgt1);
60+ }
61+ close(IN);
62+
63+ #英単語占有率によるスパム判定を行う指定がされていた場合はその判定
64+ my $english_excess_f = ($fJudgmentByEnglish < $english_phrase_share)? 1: 0;
65+
66+ my %doc_phrase_freq;
67+ foreach(@$ref_doc_phrase_freq){
68+ my ($phrase, $freq) = split /:/;
69+ $doc_phrase_freq{$phrase} = $freq;
70+ }
71+
72+ #非スパム文章っぽいか、スパム文章っぽいか、をそれぞれ算出
73+ #非スパム文章っぽさ−スパム文章っぽさ でスパムか否かを判定
74+ my @score;
75+ my $doc_phrase_num = keys %doc_phrase_freq;
76+ for(my $cate = 0; $cate < 2; $cate++){
77+ while(my ($phrase, $freq) = each %doc_phrase_freq){
78+ $score[$cate] += $wgt{$phrase}[$cate] * ($freq / $doc_phrase_num) if($phrase_bunpu{$phrase});
79+ }
80+ }
81+
82+ #判定結果を出力
83+ my $sa = $score[0] - $score[1];
84+ my $hantei1 = ($sa > $fJudgmentScore2)? 2: ($sa >= 0.0)? 1: 0;
85+ my $hantei2 = ($score[0] > $fJudgmentScore2)? 2: ($score[0] >= 0.0)? 1: 0;
86+ $hantei2 += ($score[1] > $fJudgmentScore2)? 0: ($score[1] >= 0.0)? 1: 2;
87+ $hantei2 += (2 == $hantei2)? $hantei1: (2 < $hantei2)? 1: 0;
88+# my $kekka = ($nJudgmentMethod == 3)? ($sa >= $fJudgmentScore) : ($nJudgmentMethod <= $hantei2)? 1: 0;
89+# my $kekka = ($nJudgmentMethod == 3)? ($sa >= $fJudgmentScore) : ($nJudgmentMethod <= $hantei2)? (-1.0 < $sa)? 1: 0: 0;
90+ my $kekka = ($nJudgmentMethod == 3)? ($sa >= $fJudgmentScore) : ($nJudgmentMethod <= $hantei2)? ($fJudgmentScore3 < $sa)? 1: 0: 0;
91+
92+ #戻り値として判定結果を返す
93+ return (!$illegal_ch_f and !$english_excess_f and $kekka);
94+}
95+
96+
97+#--------------------------------------------------------------------------------------------------
98+# フレーズ解析
99+#--------------------------------------------------------------------------------------------------
100+sub analysis_text
101+{
102+ #文字種
103+ my %character_kind = (
104+ '[0-9A-Za-z_]' => "半角英数", # 半角アルファベットor数字
105+ '\xA4[\xA1-\xF3]' => "ひらがな", # 全角ひらがな [ぁ-ん]
106+ '\xA5[\xA1-\xF6]|\xA1\xBC' => "カタカナ", # 全角カタカナ [ァ-ヶ]と長音「ー」
107+ '[\xB0-\xCE\xD0-\xF3][\xA1-\xFE]|\xCF[\xA1-\xD3]|\xF4[\xA1-\xA6]'
108+ => "漢字", # 全角漢字（16-46,48-83,47,84区）
109+ '\x8E[\xA6-\xDF]' => "半角カタカナ", # 半角カタカナ [ヲ-゜]
110+ );
111+
112+ # EUC-JP記号文字
113+ my $character_mark = '('
114+ . '\xA1[\xA1-\xB1\xB3-\xBB\xBD-\xFE]|' #1区（アンダースコア「＿」と長音「ー」を除く）
115+ . '\xA2[\xA1-\xAE\xBA-\xC1\xCA-\xD0\xDC-\xEA\xF2-\xF9\xFE]|' #2区
116+ . '\xA6[\xA1-\xB8\xC1-\xD8]|' #6区
117+ . '\xA7[\xA1-\xC1\xD1-\xF1]|' #7区
118+ . '\xA8[\xA1-\xC0]|' #8区
119+ . '\xAD[\xA1-\xD6\xDF-\xFC])'; #13区
120+
121+ # EUC-JP未定義文字(機種依存文字・3バイト文字を含む)
122+ my $character_undef = '([\xA9-\xAF\xF5-\xFE][\xA1-\xFE]|' # 9-15,85-94区
123+ . '\x8E[\xE0-\xFE]|' # 半角カタカナ
124+ . '\xA2[\xAF-\xB9\xC2-\xC9\xD1-\xDB\xEB-\xF1\xFA-\xFD]|' # 2区
125+ . '\xA3[\XA1-\xAF\xBA-\xC0\xDB-\xE0\xFB-\xFE]|' # 3区
126+ . '\xA4[\xF4-\xFE]|' # 4区
127+ . '\xA5[\xF7-\xFE]|' # 5区
128+ . '\xA6[\xB9-\xC0\xD9-\xFE]|' # 6区
129+ . '\xA7[\xC2-\xD0\xF2-\xFE]|' # 7区
130+ . '\xA8[\xC1-\xFE]|' # 8区
131+ . '\xCF[\xD4-\xFE]|' # 47区
132+ . '\xF4[\xA7-\xFE]|' # 84区
133+ . '\x8F[\xA1-\xFE][\xA1-\xFE])'; # 3バイト文字
134+
135+ #文字サイズ
136+ my %char_size = (
137+ '[\x00-\x7F]' => 1,
138+ '[\x8E\xA1-\xFE][\xA1-\xFE]' => 2,
139+ '\x8F[\xA1-\xFE][\xA1-\xFE]' => 3,
140+ );
141+
142+ #テキストファイル読み込み
143+ my ($text) = @_;
144+
145+ #機種依存文字存在チェック
146+ my $illegal_ch_f = 0;
147+ if($text =~ /^([\x00-\x7F]|[\x8E\xA1-\xFE][\xA1-\xFE])*($character_undef)/){
148+ $illegal_ch_f = 1;
149+ }
150+
151+ #全角記号（列）を区切り文字とする
152+ $text =~ s/\G((?:[\x00-\x7F]|[\x80-\xFF]{2})*?)($character_mark+)/$1 /og;
153+
154+ #フレーズとして抽出しない文字（列）を区切り文字とする
155+ $text =~ s/[^\w\x80-\xFF]+/ /ogs;
156+
157+ #全角英数文字 全角→半角変換
158+ $text =~ s/\G((?:[\x00-\x7F]|[\x80-\xFF]{2})*?)(\xA1\xB2|\xA3[\xC1-\xDA\xE1-\xFA\xB0-\xB9])/$1 . &zen2han_degit_alpha($2)/oge;
159+
160+ #文章を適当な区切りで分解
161+ my @phrase_list;
162+ (my $text2 = $text) =~ s/\G([\w\x80-\xFF]*)([^\w\x80-\xFF]+)/push(@phrase_list,$1)/ge;
163+ shift @phrase_list if($phrase_list[0] =~ /^\s+$/);
164+ push @phrase_list, $text unless(scalar @phrase_list);
165+
166+ #分解された文章毎に更にフレーズ分解＆フレーズ登録
167+ my %phrase_list;
168+ my (@last_phrase, @last_phrase_kind, $last_phrase_num);
169+ my $phrase_num = 0;
170+ my $english_phrase_num;
171+ my @doc_phrase_freq;
172+
173+ foreach my $phrase (@phrase_list){
174+ my $part_length;
175+
176+# $last_phrase_num = 0;
177+# @last_phrase = ();
178+# @last_phrase_kind = ();
179+
180+ #文字種の境界で分解しながら文字種毎のフレーズに分解＆適当な連結数で連結＆登録
181+ my $last_index = -1;
182+ for(my $index = 0; $index < length $phrase; ){
183+ #マルチバイト文字（漢字コード等）の並びが正当かチェック。不正なら機種依存文字使用と判断し、かつ読み飛ばす。
184+ if($last_index == $index){
185+ $illegal_ch_f = 1;
186+ last;
187+ }
188+
189+ #登録可能なフレーズの並びなら登録
190+ $last_index = $index;
191+ my $ch_kind;
192+ foreach my $kind (sort keys %character_kind){
193+ next unless($phrase =~ /^.{$index}(($kind)+)/);
194+ my $match = $1;
195+ $part_length = length($match);
196+ $ch_kind = $character_kind{$kind};
197+
198+ unshift @last_phrase, $match;
199+ unshift @last_phrase_kind, $ch_kind;
200+ $last_phrase_num++;
201+
202+ #連結することにより判定に有利に働きそうなフレーズなら連結しながら登録
203+ #そうでなくても単体のフレーズとして登録
204+ #但し、無意味な文字種やフレーズとして成り立たないような短すぎるフレーズは登録しない
205+ my $ranged_phrase = $match;
206+ for(my $i = 0; $i < $last_phrase_num; $i++){
207+# $ranged_phrase = "$last_phrase[$i]$ranged_phrase" if($i);
208+ if($i){
209+ if($last_phrase_kind[$i-1] eq $last_phrase_kind[$i]){
210+ $ranged_phrase = "$last_phrase[$i]+$ranged_phrase";
211+ }else{
212+ $ranged_phrase = "$last_phrase[$i]$ranged_phrase";
213+ }
214+ }
215+
216+ #フレーズを登録する。但し、下記の場合を除く。
217+ # 1.先頭がひらがなの句の繋がりのフレーズ（ひらがなのみのフレーズは除く）
218+ # 2.アンダースコア又は数字の１文字
219+ unless((1 < $last_phrase_num and $last_phrase_kind[$i] eq "ひらがな") or ($ranged_phrase =~ /^[_0-9](\+[_0-9])*$/)){
220+ if($nMinimumPhraseLength <= length $ranged_phrase and length $ranged_phrase <= $nMaxPhraseLength){
221+ $phrase_list{$ranged_phrase}++;
222+ $phrase_num++;
223+ $english_phrase_num++ if($ch_kind eq "半角英数");
224+ }
225+ }
226+ }
227+ #連結文字種数を超えないよう超えた分は先頭側から削除
228+ unless($last_phrase_num < $nMaxRangedNum){
229+ pop @last_phrase;
230+ pop @last_phrase_kind;
231+ $last_phrase_num--;
232+ }
233+ $index += $part_length;
234+ last;
235+ }
236+
237+ #フレーズとして抽出しない文字は読み捨てる
238+ unless($ch_kind){
239+ foreach(keys %char_size){
240+ if($phrase =~ /^.{$index}$_/){
241+ $index += $char_size{$_};
242+ last;
243+ }
244+ }
245+ }
246+ }
247+# $last_phrase_num = 0;
248+# @last_phrase = ();
249+# @last_phrase_kind = ();
250+ }
251+ my $english_phrase_share = $phrase_num? ($english_phrase_num / $phrase_num) : 0;
252+
253+ #出現頻度の多い順＞文字列長の長い順＞アルファベット順に整列して頭$nValidPhraseNum単語までを使用する
254+ my ($i, $output) = (0, "");
255+ foreach(sort {$phrase_list{$b} - $phrase_list{$a} or length($b) - length($a) or $a cmp $b} keys %phrase_list){
256+# my $freq = $phrase_list{$_};
257+ my $freq = ($phrase_list{$_} == 1)? 1: sprintf("%.4f", sqrt $phrase_list{$_});
258+ push @doc_phrase_freq, "$_:$freq";
259+ last unless(++$i < $nValidPhraseNum);
260+ }
261+
262+ #戻り値として機種依存文字の有無、英単語占有率、フレーズリスト（のリファレンス）を返す
263+ return($illegal_ch_f, $english_phrase_share, \@doc_phrase_freq);
264+}
265+
266+
267+#全角英数文字 全角→半角変換
268+sub zen2han_degit_alpha
269+{
270+ my ($ch) = @_;
271+
272+ if( $ch =~ /\xA3([\xC1-\xDA])/){ ($ch = $1) =~ tr/\xC1-\xDA/A-Z/; }
273+ elsif($ch =~ /\xA3([\xE1-\xFA])/){ ($ch = $1) =~ tr/\xE1-\xFA/a-z/; }
274+ elsif($ch =~ /\xA3([\xB0-\xB9])/){ ($ch = $1) =~ tr/\xB0-\xB9/0-9/; }
275+ else{ $ch = "_"; }
276+
277+ return $ch;
278+}
279+
280+}
281+
282+1;
283+
284+__DATA__
285+CPAN:3:1.7907,0
286+members+lycos+co:5:0,2.1825
287+際に:4:1.9842,0
288+edu:14:0,2.1829
289+写メ見放題:4:0,1.9842
290+ページ内:5:2.1825,0
291+BugTrack+wiki:4:1.9842,0
292+管理者:7:2.1826,0
293+数多:3:0,1.7907
294+イベント:3:0,1.7907
295+刺激:4:0,1.9842
296+edu+Members:4:0,1.9842
297+表示:44:2.1840,0
298+寂しい:3:0,1.7907
299+気がしますが:4:1.9842,0
300+良かったら:4:0,1.9842
301+ドキュメント:4:1.9842,0
302+Please:3:0,1.7907
303+一昨日:3:1.7907,0
304+知り合:3:0,1.7907
305+女性に:8:0,2.1826
306+最新:6:2.1825,0
307+是非参加下さい:3:0,1.7907
308+リリースしました:3:1.7907,0
309+エロ:4:0,1.9842
310+取得:4:1.9842,0
311+出力:7:2.1826,0
312+コメントが:3:1.7907,0
313+adipex:6:0,2.1826
314+htm漢方薬+精力剤:3:0,1.7907
315+forums:3:0,1.7907
316+メル:4:0,1.9842
317+願い申:3:0,1.7907
318+集めました:4:0,1.9842
319+URL+http:9:0,2.1827
320+celebrex:3:0,1.7907
321+ファイルの:7:2.1826,0
322+error:3:1.7907,0
323+会う:3:0,1.7907
324+質問:8:2.1826,0
325+一緒:11:0,2.1828
326+強制的に:3:1.7907,0
327+http+pure:5:0,2.1825
328+ホームページ:4:0,1.7907
329+見た人:3:0,1.7907
330+省略:3:1.7907,0
331+知らない:5:0,2.1825
332+slot:4:0,1.9842
333+ページに:10:2.1827,0
334+完全無料の:4:0,1.9842
335+wikiの:4:1.9842,0
336+男性の:12:0,2.1828
337+出会えた:4:0,1.9842
338+人妻+熟女:4:0,1.9842
339+素晴:5:1.7907,0
340+前に:3:1.7907,0
341+html+buy:3:0,1.7907
342+ヶ月:8:0,2.1826
343+世界:3:0,1.7907
344+リストを:3:1.7907,0
345+写真:11:0,2.1828
346+騙されたと:3:0,1.7907
347+method:3:1.7907,0
348+想像:4:0,1.9842
349+判定:3:1.7907,0
350+記述:10:2.1827,0
351+宜しくお:8:0,2.1826
352+レス:6:0,2.1825
353+書き換:13:2.1829,0
354+ポイント:6:0,2.1826
355+来て下:3:0,1.7907
356+表示される:3:1.7907,0
357+女性達が:3:0,1.7907
358+可能性:5:1.9842,0
359+ヶ月で:3:0,1.7907
360+core:5:2.1825,0
361+後は:5:0,1.7907
362+設定を:4:1.9842,0
363+up+the:4:0,1.9842
364+方に:6:0,2.1825
365+構いません:4:0,1.7907
366+感じで:6:0,1.9842
367+プラグインは:7:2.1826,0
368+興味があったら:4:0,1.9842
369+serebu+final+love:16:0,2.1830
370+必要:27:2.1833,0
371+levitra:3:0,1.7907
372+web+fc2+com:5:0,2.1825
373+final+love:25:0,2.1833
374+irete+info+ia03kh11:3:0,1.7907
375+パソコン:3:0,1.7907
376+バージョンは:3:1.7907,0
377+処理を:3:1.7907,0
378+普通の:6:0,2.1825
379+サイトで:7:0,2.1826
380+lib+Wiki+pm:3:1.7907,0
381+今年:3:0,1.7907
382+職業:3:0,1.7907
383+直接:6:1.9842,0
384+users:5:0,2.1825
385+度に:3:1.7907,0
386+安定版の:3:1.7907,0
387+自分が:6:0,2.1825
388+melkko+net:4:0,1.9842
389+思いますが:11:2.1827,0
390+vboya+h:3:0,1.7907
391+中+味:3:0,1.7907
392+results:3:0,1.7907
393+方が:11:0,2.1827
394+Parser:3:1.7907,0
395+バグトラック:3:1.7907,0
396+出会いを求:11:0,2.1828
397+quizilla:3:0,1.7907
398+連絡ください:4:0,1.9842
399+多いと:5:0,1.7907
400+category:6:2.1826,0
401+フリーメール:3:0,1.7907
402+解凍:3:1.7907,0
403+毎日:9:0,2.1827
404+from:4:0,1.9842
405+タグ挿入プラグイン:3:1.7907,0
406+vlzh+com:12:0,2.1828
407+目で:3:0,1.7907
408+当サイトでは:3:0,1.7907
409+放題:8:0,2.1826
410+出す:4:0,1.7907
411+fswiki+poi:5:2.1825,0
412+条件:4:0,1.7907
413+ココhttp:3:0,1.7907
414+600:3:0,1.7907
415+今日:8:0,2.1826
416+Internal+Server:3:1.7907,0
417+1行:3:1.7907,0
418+欲求を満:3:0,1.7907
419+ブランド品:3:0,1.7907
420+FSwiki:4:1.9842,0
421+サーバに:3:1.7907,0
422+出会える:3:0,1.7907
423+プラグインに:4:1.9842,0
424+href+http+members:5:0,2.1825
425+子Wiki:5:2.1825,0
426+FSWiki:25:2.1833,0
427+blackjack:3:0,1.7907
428+名前:7:2.1825,0
429+http+blog:3:0,1.7907
430+完全無料:25:0,2.1833
431+idea:3:0,1.7907
432+ダメ:7:2.1826,0
433+期待:6:0,1.9842
434+最近:16:0,2.1829
435+直接女性:3:0,1.7907
436+編集の:3:1.7907,0
437+希望:12:0,2.1828
438+プラグインを:17:2.1830,0
439+ath:6:0,2.1826
440+href+http+vboya:3:0,1.7907
441+http+serebu:27:0,2.1834
442+パーティー:6:0,2.1826
443+Software:5:2.1825,0
444+attach:6:2.1825,0
445+余り:3:0,1.7907
446+男性も:5:0,2.1825
447+無駄:5:0,2.1825
448+ディレクトリを:7:2.1826,0
449+com+bc:5:0,2.1825
450+是非参加下さいhttp:3:0,1.7907
451+ページが表示:6:2.1825,0
452+デート:4:0,1.9842
453+信用第一:3:0,1.7907
454+ultram+order+ultram:3:0,1.7907
455+all:9:0,2.1827
456+全て無料:5:0,2.1825
457+正しく:7:2.1826,0
458+運営:7:0,2.1826
459+当サイトは:7:0,2.1826
460+s1+freexy:4:0,1.9842
461+pure:11:0,2.1828
462+コチラから:3:0,1.7907
463+online+url+a:5:0,2.1825
464+m+_+_:3:1.7907,0
465+メニュー:5:1.9842,0
466+docs:3:1.7907,0
467+hart+com:5:0,2.1825
468+コメントプラグイン:5:2.1825,0
469+コメントを:5:2.1825,0
470+金持ちの:3:0,1.7907
471+週1:3:0,1.7907
472+エッチな:5:0,2.1825
473+プラグインを使:5:2.1825,0
474+com+users:5:0,2.1825
475+情報を:7:0,2.1825
476+プラグインを改造:3:1.7907,0
477+話題:5:0,2.1825
478+個別:3:1.7907,0
479+ブラウザ:5:2.1825,0
480+女は:3:0,1.7907
481+子からガンガン:3:0,1.7907
482+locate+object+method:3:1.7907,0
483+選ぶ:3:0,1.7907
484+http+sky:5:0,2.1825
485+You:5:0,1.9842
486+気持:11:0,2.1828
487+希望の女性:3:0,1.7907
488+編集:16:2.1830,0
489+指定:23:2.1833,0
490+perfections:3:0,1.7907
491+各ページ:5:2.1825,0
492+wiki+cgi+page:4:1.9842,0
493+女性紹介サークル:3:0,1.7907
494+buy+phentermine+url:4:0,1.9842
495+EditPage+pm:3:1.7907,0
496+the+good:3:0,1.7907
497+歳で:3:0,1.7907
498+phentermine+a+http:4:0,1.9842
499+例えば:6:1.9842,0
500+残念:7:2.1826,0
501+young+teens:3:0,1.7907
502+組み込:4:1.9842,0
503+pure+final+love:5:0,2.1825
504+掲示板に:4:0,1.7907
505+求め:3:0,1.7907
506+集めました無料:3:0,1.7907
507+Session:3:1.7907,0
508+簡単な:7:2.1825,0
509+utfk:3:0,1.7907
510+状態:7:2.1825,0
511+写真を:3:0,1.7907
512+完全無料で:6:0,2.1826
513+http+cb402:6:0,2.1826
514+www+quizilla+com:3:0,1.7907
515+net+a9:5:0,2.1825
516+一番:5:0,2.1825
517+world:4:0,1.9842
518+this+url:3:0,1.7907
519+very:4:0,1.9842
520+1人:3:0,1.7907
521+バージョンを:3:1.7907,0
522+xanax:3:0,1.7907
523+store:3:0,1.7907
524+コン:3:0,1.7907
525+FrontPage:6:2.1826,0
526+ヤリマンちゃんまで:3:0,1.7907
527+新規:3:0,1.7907
528+2を:5:2.1825,0
529+書き:27:2.1833,0
530+同様:12:2.1828,0
531+http+members:5:0,2.1825
532+希望の:4:0,1.9842
533+comment:10:2.1827,0
534+権限:3:1.7907,0
535+ページを:21:2.1831,0
536+昨日や:3:1.7907,0
537+付き:15:0,2.1829
538+config:5:2.1825,0
539+チェック:13:2.1828,0
540+今月:6:0,2.1826
541+彼女:6:0,2.1826
542+気付:3:1.7907,0
543+名の:3:1.7907,0
544+http+pure+final:5:0,2.1825
545+具体的:4:1.9842,0
546+sexfriend+club+net:4:0,1.9842
547+体験:6:0,2.1826
548+BBSサポート掲示板:6:2.1826,0
549+間に:5:0,1.7907
550+同梱:4:1.9842,0
551+business:3:0,1.7907
552+当サイト:15:0,2.1829
553+複数行プラグイン:4:1.9842,0
554+一切:5:0,2.1825
555+女性が:15:0,2.1829
556+漢方薬+精力剤+媚薬:3:0,1.7907
557+biz+cas:11:0,2.1828
558+学習:3:1.7907,0
559+遊びに:7:0,2.1826
560+参加者:3:0,1.7907
561+href+http+volny:3:0,1.7907
562+setup:7:2.1826,0
563+女性紹介:3:0,1.7907
564+users+phentermine:3:0,1.7907
565+不安:4:0,1.7907
566+改造:6:2.1826,0
567+最初から:4:1.9842,0
568+熟女:7:0,2.1826
569+作成:27:2.1833,0
570+adderall:4:0,1.9842
571+金を稼:6:0,2.1826
572+身を:3:0,1.7907
573+h+fc2+com:4:0,1.9842
574+日に:4:0,1.7907
575+稼ぐ:4:0,1.9842
576+ページは:3:1.7907,0
577+機能が:4:1.9842,0
578+THE:3:0,1.7907
579+picture:3:0,1.7907
580+エントリーされれば:3:0,1.7907
581+quizilla+com+users:3:0,1.7907
582+部分:12:2.1828,0
583+サーバ:11:2.1827,0
584+パワーアップ:3:0,1.7907
585+原因:12:2.1828,0
586+出ます:6:2.1826,0
587+キーワード:3:1.7907,0
588+メッセージが:5:1.9842,0
589+a10:3:0,1.7907
590+PDFには:3:1.7907,0
591+アクション:3:1.7907,0
592+includeプラグイン:4:1.9842,0
593+僕は:4:0,1.7907
594+セッション:3:1.7907,0
595+サービス:4:0,1.9842
596+http+serebu+biz:11:0,2.1828
597+男性を:4:0,1.9842
598+done:4:0,1.9842
599+一度+私:3:0,1.7907
600+申し上:3:0,1.7907
601+ne+jp:4:0,1.7907
602+書式:5:2.1825,0
603+完全に:3:0,1.7907
604+安定版:4:1.9842,0
605+募集中:4:0,1.9842
606+逆に:4:0,1.7907
607+com+buy:3:0,1.7907
608+最新の:5:1.9842,0
609+Hi+my:3:0,1.7907
610+求めてる:3:0,1.7907
611+男性も女性:3:0,1.7907
612+http+vboya+h:3:0,1.7907
613+金を:14:0,2.1829
614+時間:25:0,2.1833
615+全員:3:0,1.7907
616+余りエッチ:3:0,1.7907
617+恋人探:3:0,1.7907
618+CGI2:3:1.7907,0
619+複数の:5:1.9842,0
620+serebu+biz+cas:11:0,2.1828
621+ログ:6:2.1826,0
622+ultram+a:3:0,1.7907
623+セックスを:4:0,1.9842
624+紹介します:4:0,1.9842
625+データ:6:2.1826,0
626+like+this:4:0,1.9842
627+改良:3:1.7907,0
628+割り切:16:0,2.1830
629+女性は:7:0,2.1826
630+ディレクトリの:6:2.1826,0
631+phentermine+online+a:5:0,2.1825
632+媚薬ダイエット:5:0,2.1825
633+url:13:0,2.1829
634+irete:4:0,1.9842
635+他に:4:1.7907,0
636+サイトを通:3:0,1.7907
637+sky+hart+com:5:0,2.1825
638+ヤバ:3:0,1.7907
639+料金は:4:0,1.9842
640+furniture:3:0,1.7907
641+div:3:1.7907,0
642+毎に:5:1.9842,0
643+can:5:0,2.1825
644+http+www+ok3e:3:0,1.7907
645+ガンガン:3:0,1.7907
646+5+6で:3:1.7907,0
647+BBS:11:2.1827,0
648+導入:6:2.1825,0
649+Thanks+http:6:0,2.1826
650+サークル:9:0,2.1827
651+プラグインが:8:2.1826,0
652+空白:3:1.7907,0
653+サイトを:14:0,2.1829
654+安心してご:7:0,2.1826
655+確実:9:0,2.1827
656+Footerに:5:2.1825,0
657+人妻が:3:0,1.7907
658+乱交パーティー:6:0,2.1826
659+ソースの:3:1.7907,0
660+契約:4:0,1.9842
661+site:34:0,2.1837
662+cheap+phentermine:4:0,1.9842
663+Thank:4:0,1.9842
664+cialis:6:0,2.1826
665+3+html+http:3:0,1.7907
666+Google:3:1.7907,0
667+quote:3:0,1.7907
668+一般:4:1.9842,0
669+人集:3:0,1.7907
670+6に:3:1.7907,0
671+可愛い:4:0,1.9842
672+気の:3:0,1.7907
673+ハメ:5:0,2.1825
674+ネット:4:0,1.9842
675+次の:4:0,1.7907
676+ファイルを:13:2.1829,0
677+直アド:3:0,1.7907
678+ページ名を:3:1.7907,0
679+高い:5:0,2.1825
680+ath+cx+serebu:4:0,1.9842
681+will:4:0,1.9842
682+here:3:0,1.7907
683+参加:11:0,2.1828
684+the+good+work:3:0,1.7907
685+htm漢方薬:3:0,1.7907
686+design+http:3:0,1.7907
687+人気の秘密:3:0,1.7907
688+手順:4:1.7907,0
689+優良出会い系:3:0,1.7907
690+sblog:5:0,2.1825
691+検討:5:2.1825,0
692+A+A+href:5:0,2.1825
693+切り:5:0,2.1825
694+少ない:5:0,1.9842
695+画像の:3:1.7907,0
696+深い:3:0,1.7907
697+女性と:5:0,2.1825
698+Keep+up+the:3:0,1.7907
699+事が出来:4:0,1.9842
700+互い:4:0,1.9842
701+関係を求:4:0,1.9842
702+http+fswiki:5:2.1825,0
703+場合に:12:2.1828,0
704+site+Thanks+http:6:0,2.1826
705+人集めた乱交:3:0,1.7907
706+teens:3:0,1.7907
707+過ごし:3:0,1.7907
708+FAQ:5:2.1825,0
709+有効:8:2.1826,0
710+趣味:3:0,1.7907
711+半信半疑:4:0,1.9842
712+時間を過:3:0,1.7907
713+See:3:0,1.7907
714+管理者に:3:1.7907,0
715+事が:5:0,2.1825
716+記述を:3:1.7907,0
717+管理者権限:3:1.7907,0
718+販売:3:0,1.7907
719+ページでは:3:1.7907,0
720+via+package+Wiki:3:1.7907,0
721+plugin:27:2.1834,0
722+目指:3:0,1.7907
723+wiki+wiki+cgi:5:2.1825,0
724+website:9:0,2.1827
725+ok3e:3:0,1.7907
726+with+Perl5:3:1.7907,0
727+NobodyExplorer:3:1.7907,0
728+40代:3:0,1.7907
729+メッセージが出:3:1.7907,0
730+上記:8:2.1826,0
731+手順を:3:1.7907,0
732+欲求不満:3:0,1.7907
733+絶対:6:0,2.1825
734+blog:5:0,1.9842
735+手数:4:1.7907,0
736+仲良:6:0,2.1826
737+下さいね:4:0,1.9842
738+phentermine+url+a:4:0,1.9842
739+メソッド:5:2.1825,0
740+欲求:4:0,1.9842
741+個人的:6:0,1.9842
742+URL+http+www:7:0,2.1826
743+インストール:13:2.1829,0
744+最後:5:1.9842,0
745+嬉しいです:4:0,1.7907
746+検索して下:3:0,1.7907
747+EditPage:3:1.7907,0
748+箇所:4:0,1.7907
749+女子校生:3:0,1.7907
750+like+this+url:3:0,1.7907
751+仕組:5:2.1825,0
752+club+net:4:0,1.9842
753+出会いが:5:0,2.1825
754+www+ok3e:3:0,1.7907
755+面倒:5:2.1825,0
756+感想:4:0,1.7907
757+フォルダ:3:1.7907,0
758+FSWikiを:8:2.1826,0
759+for+you:3:0,1.7907
760+素敵な女性:4:0,1.9842
761+採用:3:0,1.7907
762+指定した:3:1.7907,0
763+突然すみません:3:0,1.7907
764+ath+cx:6:0,2.1826
765+プラグインも:3:1.7907,0
766+以下の:13:2.1828,0
767+Error:5:2.1825,0
768+方も:3:0,1.7907
769+実行:7:2.1826,0
770+name:5:1.7907,0
771+本当に出会:3:0,1.7907
772+子供:4:0,1.9842
773+a+http:13:0,2.1829
774+機能を:9:2.1827,0
775+関しては:4:1.7907,0
776+検索して:3:0,1.7907
777+net出会:3:0,1.7907
778+プラグイン:60:2.1848,1.2337
779+知らせ:3:0,1.7907
780+使用した:5:2.1825,0
781+html+http+www:3:0,1.7907
782+共有:5:2.1825,0
783+注目:3:0,1.7907
784+fswiki+poi+jp:5:2.1825,0
785+love+net:25:0,2.1833
786+lycos+co:5:0,2.1825
787+sendmail:4:1.9842,0
788+Install:7:2.1826,0
789+http+www+nnili:3:0,1.7907
790+wiki+wiki:5:2.1825,0
791+試し:4:0,1.9842
792+返事が:3:0,1.7907
793+fc2+com:9:0,2.1827
794+宣伝:6:0,2.1826
795+chown:3:1.7907,0
796+名に:3:1.7907,0
797+28歳:5:0,2.1825
798+nice:9:0,2.1827
799+表示が:3:1.7907,0
800+皆様に:3:0,1.7907
801+cgi+bin:6:1.9842,0
802+金持:4:0,1.9842
803+全然:3:0,1.7907
804+不満:6:0,2.1826
805+市場:3:0,1.7907
806+普段:4:0,1.9842
807+自慢:3:0,1.7907
808+html+a:3:0,1.7907
809+大人:11:0,2.1828
810+手間:5:2.1825,0
811+放題+写メ:4:0,1.9842
812+引数:3:1.7907,0
813+騙されたと思:3:0,1.7907
814+0で:3:1.7907,0
815+出会い:31:0,2.1836
816+合い:4:0,1.9842
817+アソコ:7:0,2.1826
818+興味があれば:3:0,1.7907
819+セフレ募集中:3:0,1.7907
820+order+ultram:3:0,1.7907
821+連絡下さい:5:0,2.1825
822+方法:24:2.1832,0
823+少し:8:2.1825,1.7907
824+追加:22:2.1831,1.7907
825+net:78:1.2337,2.1855
826+表示されません:3:1.7907,0
827+放題+写:4:0,1.9842
828+cgimembera+org:3:0,1.7907
829+不足:3:1.7907,0
830+テスト:4:1.9842,0
831+hart:5:0,2.1825
832+女性達が割:3:0,1.7907
833+A+A:5:0,2.1825
834+are:5:0,2.1825
835+jp+wiki+cgi:5:2.1825,0
836+HTML:11:2.1828,0
837+利用下:3:0,1.7907
838+中に:9:2.1826,0
839+女性が男性:3:0,1.7907
840+開発版の:3:1.7907,0
841+Very:8:0,2.1826
842+はじめまして:6:0,1.9842
843+応募:3:0,1.7907
844+ブランド:6:0,2.1826
845+ユーザ:6:2.1826,0
846+相当:4:0,1.9842
847+系サイトの:5:0,2.1825
848+kotowaru:4:0,1.9842
849+完全無料だから:3:0,1.7907
850+リンクを:9:2.1827,0
851+確実に:5:0,2.1825
852+系サイト:13:0,2.1829
853+ありがとうございます:6:2.1826,0
854+禁止:4:1.7907,0
855+解決:11:2.1827,0
856+動作:18:2.1831,0
857+漢方薬+精力剤:3:0,1.7907
858+名を:6:2.1826,0
859+連絡:11:0,2.1828
860+yummycats+net+a9:5:0,2.1825
861+表示します:4:1.7907,0
862+画像を:3:1.7907,0
863+work:10:0,2.1827
864+選び:5:0,1.9842
865+付き合:15:0,2.1829
866+突然:6:0,2.1826
867+http+volny:3:0,1.7907
868+File:4:1.9842,0
869+貴方:20:0,2.1831
870+下さいhttp:14:0,2.1829
871+pdf:3:1.7907,0
872+管理画面の:4:1.9842,0
873+方の:4:1.7907,0
874+今まで:3:0,1.7907
875+内に:8:2.1826,0
876+現象が:3:1.7907,0
877+元の:4:1.9842,0
878+出会いサイト:5:0,2.1825
879+主人:7:0,2.1826
880+形式で:4:1.9842,0
881+Hi+all:3:0,1.7907
882+30代:5:0,2.1825
883+prescription+a:3:0,1.7907
884+参照:12:2.1828,0
885+人妻を:3:0,1.7907
886+会える:6:0,2.1826
887+ページを作:4:1.7907,0
888+キャンペーン:3:0,1.7907
889+online:20:0,2.1831
890+プラグインで:11:2.1828,0
891+女性も:8:0,2.1826
892+気になる:3:0,1.7907
893+少しでも:3:0,1.7907
894+a+url+http:4:0,1.9842
895+代の:5:0,2.1825
896+便利:10:2.1827,0
897+秘密の:4:0,1.9842
898+昨日や一昨日:3:1.7907,0
899+配置:3:1.7907,0
900+http+vlzh+com:12:0,2.1828
901+換える:3:1.7907,0
902+final+love+net:25:0,2.1833
903+パラメータ:3:1.7907,0
904+ia03kh11:3:0,1.7907
905+時は本当:3:0,1.7907
906+サークルを:4:0,1.9842
907+A+href:6:0,2.1826
908+許可:4:1.7907,0
909+男性に:3:0,1.7907
910+メソッドを:3:1.7907,0
911+使えない:3:1.7907,0
912+cgimembera:3:0,1.7907
913+貴方に:3:0,1.7907
914+pm+line:5:2.1825,0
915+タイトル:3:1.7907,0
916+事を:4:0,1.7907
917+コピペ:4:0,1.9842
918+詳細は:6:0,2.1825
919+肉棒:3:0,1.7907
920+本体:3:1.7907,0
921+綺麗な:3:0,1.7907
922+無料:38:0,2.1838
923+FSWiki3+5:4:1.9842,0
924+index+html:5:0,2.1825
925+the+site:3:0,1.7907
926+中身:4:1.9842,0
927+切った:7:0,2.1826
928+パートナー:5:0,2.1825
929+本当に:14:0,2.1829
930+上記の:4:1.9842,0
931+使っている:5:2.1825,0
932+女性会員様:4:0,1.9842
933+html+phentermine:5:0,2.1825
934+lycos+co+uk:5:0,2.1825
935+同じエラー:4:1.9842,0
936+是非参加下:3:0,1.7907
937+Server+Error:3:1.7907,0
938+歳の:4:0,1.9842
939+バイブ:3:0,1.7907
940+上げます:6:0,2.1825
941+精力剤:4:0,1.9842
942+覧下さいhttp:3:0,1.7907
943+http+utfk:3:0,1.7907
944+遊びに来:5:0,2.1825
945+充実:4:0,1.7907
946+look:7:0,2.1826
947+action:3:1.7907,0
948+宜しくお願:8:0,2.1826
949+認識:3:1.7907,0
950+有難:3:0,1.7907
951+今月の:3:0,1.7907
952+online+http:4:0,1.9842
953+貴方の:8:0,2.1826
954+金が:5:0,2.1825
955+mad+buttobi:4:0,1.9842
956+ホテル:4:0,1.9842
957+FreeStyleWiki3:3:1.7907,0
958+彼氏:7:0,2.1826
959+教え:3:0,1.7907
960+セキュリティ:5:2.1825,0
961+逆援助:6:0,2.1826
962+video:3:0,1.7907
963+試してみて:4:0,1.7907
964+読み込:3:1.7907,0
965+挿入:6:2.1826,0
966+Sex:3:0,1.7907
967+環境設定:3:1.7907,0
968+以外:6:2.1825,0
969+text:3:1.7907,0
970+href+http+www:17:0,2.1830
971+簡単にお:3:0,1.7907
972+erectile+dysfunction:3:0,1.7907
973+プラグインですね:3:1.7907,0
974+ディレクトリ:23:2.1833,0
975+強制的:3:1.7907,0
976+書式を:3:1.7907,0
977+cb402+ath+cx:6:0,2.1826
978+どうやら:3:1.7907,0
979+site+Thanks:6:0,2.1826
980+人気の:3:0,1.7907
981+A+href+http:6:0,2.1826
982+一部:4:1.9842,0
983+Prescription:3:0,1.7907
984+笑http:3:0,1.7907
985+願い致:6:0,2.1825
986+他では:3:0,1.7907
987+setup+dat:6:2.1826,0
988+htm:8:0,2.1826
989+ページ名:6:2.1826,0
990+求める:8:0,2.1826
991+サポート掲示板:7:2.1826,0
992+cas:11:0,2.1828
993+Unix:3:1.7907,0
994+deai:3:0,1.7907
995+Cookie:3:1.7907,0
996+動画:7:0,2.1826
997+勉強:4:1.7907,0
998+大丈夫:5:1.9842,0
999+アップロード:4:1.9842,0
1000+serebu+biz:11:0,2.1828
1001+参加しませんか:3:0,1.7907
1002+サイトです:11:0,2.1828
1003+出力する:3:1.7907,0
1004+プロバイダ:3:1.7907,0
1005+BBSサポート:6:2.1826,0
1006+感覚:3:0,1.7907
1007+初心者:7:0,2.1825
1008+形式:8:2.1826,0
1009+Super:3:0,1.7907
1010+押すと:4:1.9842,0
1011+スペース:7:2.1826,0
1012+使用している:3:1.7907,0
1013+実現:4:1.9842,0
1014+page:10:2.1827,0
1015+phentermine+a:8:0,2.1826
1016+女の子:5:0,2.1825
1017+実際の:4:1.7907,0
1018+危険:4:1.7907,0
1019+機能:19:2.1831,0
1020+phentermine:9:0,2.1827
1021+uk+kotowaru:4:0,1.9842
1022+more:6:0,2.1825
1023+モードを:3:1.7907,0
1024+会員:5:0,2.1825
1025+uk+kotowaru投稿拒否:4:0,1.9842
1026+待ちしてますhttp:3:0,1.7907
1027+tramadol:5:0,2.1825
1028+属性:5:2.1825,0
1029+コア:3:1.7907,0
1030+poi+jp+wiki:5:2.1825,0
1031+テンプレート:4:1.9842,0
1032+cx+serebu:4:0,1.9842
1033+than:4:0,1.9842
1034+使う:6:2.1825,0
1035+合う:7:0,2.1826
1036+月で:4:0,1.9842
1037+include:7:2.1826,0
1038+探しの:3:0,1.7907
1039+集まり:4:0,1.9842
1040+見出:5:2.1825,0
1041+マジ:4:0,1.9842
1042+性の:3:0,1.7907
1043+側で:5:2.1825,0
1044+インターネット:4:0,1.9842
1045+online+html:4:0,1.9842
1046+若い:3:0,1.7907
1047+ultram:3:0,1.7907
1048+buy+phentermine+a:5:0,2.1825
1049+old:4:0,1.9842
1050+身体:8:0,2.1826
1051+素敵な:19:0,2.1831
1052+詳しくは:11:0,2.1827
1053+URLを:4:1.7907,0
1054+HTMLタグ挿入:4:1.9842,0
1055+携帯の:3:0,1.7907
1056+生活:6:0,2.1826
1057+別窓で:3:1.7907,0
1058+最近では:3:0,1.7907
1059+Util:3:1.7907,0
1060+制限:8:2.1826,0
1061+メル友:3:0,1.7907
1062+object:4:1.9842,0
1063+本気:3:0,1.7907
1064+都合:4:0,1.9842
1065+ソースを見:3:1.7907,0
1066+tmpl:7:2.1826,0
1067+置換:3:1.7907,0
1068+メールの:5:0,1.9842
1069+melkko:4:0,1.9842
1070+投稿拒否:5:0,2.1825
1071+容姿:3:0,1.7907
1072+相談:4:0,1.7907
1073+人は:10:0,2.1827
1074+lycos:5:0,2.1825
1075+動きました:4:1.9842,0
1076+使って:4:1.9842,0
1077+url+http+www:6:0,2.1826
1078+覧下さい:8:0,2.1826
1079+poi:6:2.1826,0
1080+待ってますhttp:3:0,1.7907
1081+埋め込:3:1.7907,0
1082+今後も:3:0,1.7907
1083+支払いします:3:0,1.7907
1084+http+www+quizilla:3:0,1.7907
1085+umask:3:1.7907,0
1086+迷惑:5:1.7907,0
1087+up+to:3:0,1.7907
1088+刺激を:3:0,1.7907
1089+CVS:3:1.7907,0
1090+http+cb402+ath:6:0,2.1826
1091+様な:5:0,1.7907
1092+ディレクトリは:4:1.9842,0
1093+Hello:9:0,2.1827
1094+コード:4:1.9842,0
1095+埋め:3:1.7907,0
1096+スレ:4:0,1.9842
1097+sky:6:0,2.1826
1098+解決しました:5:2.1825,0
1099+教えちゃいます:3:0,1.7907
1100+1ページ:3:1.7907,0
1101+html+Buy:3:0,1.7907
1102+男性は:5:0,2.1825
1103+真剣:8:0,2.1826
1104+Wikiに:3:1.7907,0
1105+遊び:5:0,2.1825
1106+申し訳:5:1.7907,0
1107+実装:11:2.1828,0
1108+行を:3:1.7907,0
1109+完全:5:0,2.1825
1110+final:25:0,2.1833
1111+来てくださいね:3:0,1.7907
1112+流出:3:0,1.7907
1113+作成し:3:1.7907,0
1114+what:3:0,1.7907
1115+互いの:4:0,1.9842
1116+不倫:5:0,2.1825
1117+root:3:1.7907,0
1118+複数行:5:2.1825,0
1119+大胆:3:0,1.7907
1120+vboya:3:0,1.7907
1121+会員数:3:0,1.7907
1122+the:19:0,2.1830
1123+詳しい:7:0,2.1826
1124+方で:4:0,1.7907
1125+package+Wiki:3:1.7907,0
1126+自信:4:0,1.9842
1127+タグを:3:1.7907,0
1128+vlzh:12:0,2.1828
1129+1000:5:0,2.1825
1130+昨日:3:1.7907,0
1131+映像:4:0,1.9842
1132+buttobi+net:4:0,1.9842
1133+at+lib:3:1.7907,0
1134+html+url:3:0,1.7907
1135+http+irete:4:0,1.9842
1136+女性と知:3:0,1.7907
1137+order+ultram+a:3:0,1.7907
1138+タグ挿入:4:1.9842,0
1139+脚注:3:1.7907,0
1140+27歳:4:0,1.9842
1141+長文:3:1.7907,0
1142+欲しい:5:0,1.9842
1143+詳しくはhttp:4:0,1.9842
1144+ヤリマン:3:0,1.7907
1145+勝手:5:1.7907,0
1146+http+fswiki+poi:5:2.1825,0
1147+sexfriend+club:4:0,1.9842
1148+url+a:9:0,2.1827
1149+今や:3:0,1.7907
1150+ページが:12:2.1828,0
1151+エラーが:12:2.1828,0
1152+欲しいです:5:0,1.7907
1153+ref:8:2.1826,0
1154+優良:6:0,2.1826
1155+女子:3:0,1.7907
1156+カテゴリ名:3:1.7907,0
1157+反映:6:2.1826,0
1158+方法を:3:1.7907,0
1159+qdq38:3:0,1.7907
1160+kotowaru投稿拒否:4:0,1.9842
1161+言うと:3:0,1.7907
1162+good+site:4:0,1.9842
1163+Install+pm:7:2.1826,0
1164+you:19:0,2.1831
1165+合コン:3:0,1.7907
1166+始めて:3:0,1.7907
1167+プラグインを作:3:1.7907,0
1168+Server:4:1.9842,0
1169+大変便利:3:1.7907,0
1170+予定:4:1.7907,0
1171+plugin+core:4:1.9842,0
1172+単位:3:1.7907,0
1173+皆様:6:0,2.1825
1174+アイデア:4:1.9842,0
1175+mad+buttobi+net:4:0,1.9842
1176+見た目:3:0,1.7907
1177+商品:6:0,2.1826
1178+問題が:4:0,1.7907
1179+a+href:46:0,2.1842
1180+サイトでは:5:0,1.9842
1181+GUCCI:4:0,1.9842
1182+hair:3:0,1.7907
1183+取り:10:2.1827,0
1184+for:14:0,2.1829
1185+cheap+phentermine+a:4:0,1.9842
1186+待ってます:6:0,2.1826
1187+自由:5:0,1.7907
1188+this+url+http:3:0,1.7907
1189+adipex+URL:3:0,1.7907
1190+願い:11:0,2.1827
1191+yummycats+net+a10:3:0,1.7907
1192+重要:4:0,1.9842
1193+サイトをご紹介:7:0,2.1826
1194+yummycats:15:0,2.1829
1195+男性:35:0,2.1838
1196+可愛:4:0,1.9842
1197+対応:20:2.1831,0
1198+ページで:4:1.9842,0
1199+可愛い子:4:0,1.9842
1200+今では:3:0,1.7907
1201+http+sexfriend+club:4:0,1.9842
1202+キャッシュ:7:2.1826,0
1203+子だけを:3:0,1.7907
1204+関連:6:2.1825,0
1205+優良サイトを:3:0,1.7907
1206+環境:11:2.1827,0
1207+選び放題:4:0,1.9842
1208+best+final:4:0,1.9842
1209+apache:3:1.7907,0
1210+来て:5:0,2.1825
1211+www+nnili:3:0,1.7907
1212+FSWiki3:4:1.9842,0
1213+報酬:3:0,1.7907
1214+相手:17:0,2.1830
1215+イメージ:5:1.7907,0
1216+利用頂:3:0,1.7907
1217+家族:3:0,1.7907
1218+友達:20:0,2.1831
1219+近所:6:0,2.1826
1220+申し:9:1.7907,2.1826
1221+href+http:52:1.2337,2.1845
1222+提供を:3:0,1.7907
1223+設置:3:1.7907,0
1224+Members:4:0,1.9842
1225+ガンガンのヤリマン:3:0,1.7907
1226+nice+site:7:0,2.1826
1227+結婚して:3:0,1.7907
1228+this:9:0,2.1826
1229+sblog+cz:5:0,2.1825
1230+エラーメッセージ:3:1.7907,0
1231+時は:5:0,1.9842
1232+妊娠:3:0,1.7907
1233+安心してご利用:6:0,2.1826
1234+安心して:3:0,1.7907
1235+package:3:1.7907,0
1236+volny+cz:3:0,1.7907
1237+ttp:4:0,1.9842
1238+バグです:3:1.7907,0
1239+詳しい詳細:3:0,1.7907
1240+下に:3:1.7907,0
1241+ログイン:5:1.9842,0
1242+時代:5:0,2.1825
1243+注意:6:0,1.9842
1244+交換:4:0,1.9842
1245+濃厚:5:0,2.1825
1246+大勢:5:0,2.1825
1247+標準:5:2.1825,0
1248+Good:7:0,2.1826
1249+サイトをご:9:0,2.1827
1250+気軽に:5:0,2.1825
1251+カテゴリ内:3:1.7907,0
1252+文字:5:2.1825,0
1253+line:9:2.1826,0
1254+使い:12:2.1827,0
1255+http+sexfriend:4:0,1.9842
1256+直後:3:1.7907,0
1257+バージョン:12:2.1828,0
1258+家庭:3:0,1.7907
1259+calendar:3:1.7907,0
1260+net+a10:3:0,1.7907
1261+リリース:11:2.1828,0
1262+大好:4:0,1.9842
1263+参加者の写真:3:0,1.7907
1264+意味:8:2.1826,0
1265+Jcode:4:1.9842,0
1266+乱交パーティーに:3:0,1.7907
1267+次第:7:0,2.1825
1268+給料:3:0,1.7907
1269+online+a:10:0,2.1827
1270+1の:4:1.7907,0
1271+スパム:4:1.9842,0
1272+使用:19:2.1830,0
1273+オススメ:7:0,2.1826
1274+濃厚な:5:0,2.1825
1275+利用下さい:3:0,1.7907
1276+連絡下:5:0,2.1825
1277+出会:44:0,2.1841
1278+members:5:0,2.1825
1279+h+fc2:4:0,1.9842
1280+クリック:8:2.1826,0
1281+友達と:4:0,1.9842
1282+000:5:0,2.1825
1283+経験ない子:3:0,1.7907
1284+php:6:0,2.1826
1285+ページ名の:3:1.7907,0
1286+一覧:6:2.1826,0
1287+入力:4:1.9842,0
1288+場合には:6:2.1826,0
1289+中心:5:0,1.7907
1290+Phentermine:3:0,1.7907
1291+ライセンス:4:1.9842,0
1292+表示されます:3:1.7907,0
1293+リニューアル:4:0,1.9842
1294+Can:5:2.1825,0
1295+人に:10:0,2.1827
1296+環境で:5:2.1825,0
1297+INC:4:1.9842,0
1298+以下のように:3:1.7907,0
1299+www+cgimembera+org:3:0,1.7907
1300+互換性:3:1.7907,0
1301+プロフィールを:4:0,1.9842
1302+幸運:3:0,1.7907
1303+ページの:17:2.1830,0
1304+手順を踏:3:1.7907,0
1305+最強:3:0,1.7907
1306+woman+l:4:0,1.9842
1307+cgi+page:4:1.9842,0
1308+http+volny+cz:3:0,1.7907
1309+行頭:3:1.7907,0
1310+have+a:4:0,1.9842
1311+文字化:3:1.7907,0
1312+cgiの:9:2.1827,0
1313+サクラ:9:0,2.1827
1314+men:6:0,2.1826
1315+Software+Error:3:1.7907,0
1316+game:3:0,1.7907
1317+I+like:6:0,2.1826
1318+utfk+com:3:0,1.7907
1319+プレゼント:3:0,1.7907
1320+移動:3:1.7907,0
1321+html+url+http:3:0,1.7907
1322+人と:4:0,1.9842
1323+a+href+http:46:0,2.1842
1324+irete+info:4:0,1.9842
1325+コミュニティ:4:0,1.7907
1326+self:4:1.9842,0
1327+ヘルプ:4:1.9842,0
1328+仕様:7:2.1826,0
1329+エッチ経験ない:3:0,1.7907
1330+_+_+m:3:1.7907,0
1331+作成された:3:1.7907,0
1332+真剣に:6:0,2.1826
1333+パーミッション:8:2.1826,0
1334+系サイトで:3:0,1.7907
1335+全く:3:0,1.7907
1336+ダウンロード:5:2.1825,0
1337+pmの:10:2.1827,0
1338+文字列の:3:1.7907,0
1339+生成:11:2.1828,0
1340+アド:3:0,1.7907
1341+多いと思:4:0,1.7907
1342+free:8:0,2.1826
1343+PDF:6:2.1826,0
1344+a+url:4:0,1.9842
1345+思ったのですが:3:1.7907,0
1346+組み:6:2.1826,0
1347+別窓:3:1.7907,0
1348+Internal:3:1.7907,0
1349+well:3:0,1.7907
1350+fswiki:8:2.1826,0
1351+pmを:10:2.1827,0
1352+待ちしてます:3:0,1.7907
1353+html+cialis:3:0,1.7907
1354+盛り:3:0,1.7907
1355+プラグインの出力:3:1.7907,0
1356+聞いて:3:0,1.7907
1357+serebu:31:0,2.1836
1358+www+quizilla:3:0,1.7907
1359+無料なので:4:0,1.9842
1360+good:11:0,2.1828
1361+詳細はhttp:5:0,2.1825
1362+htaccess:4:1.9842,0
1363+CGI+Session:3:1.7907,0
1364+使うと:4:1.9842,0
1365+レスを:3:0,1.7907
1366+パッチ:8:2.1826,0
1367+参加者の:3:0,1.7907
1368+セフレを:3:0,1.7907
1369+知らない人:3:0,1.7907
1370+興味:18:0,2.1830
1371+ムービー:3:0,1.7907
1372+思いますページ:3:1.7907,0
1373+エラーが出:9:2.1827,0
1374+ファイルは:4:1.9842,0
1375+wife:3:0,1.7907
1376+yahoo:3:0,1.7907
1377+nnili+com:3:0,1.7907
1378+file:5:2.1825,0
1379+秘密:11:0,2.1828
1380+ページを作成:3:1.7907,0
1381+分かります:3:0,1.7907
1382+ファイルに:3:1.7907,0
1383+金を払:3:0,1.7907
1384+バグ:12:2.1828,0
1385+更新:14:2.1829,0
1386+人数:4:0,1.9842
1387+2で:3:1.7907,0
1388+sky+hart:5:0,2.1825
1389+変換:6:2.1826,0
1390+付け:3:1.7907,0
1391+無料エントリー:7:0,2.1826
1392+全て:12:0,2.1827
1393+違います:4:0,1.9842
1394+使っています:3:1.7907,0
1395+媚薬:5:0,2.1825
1396+記入:4:0,1.9842
1397+エスケープ:3:1.7907,0
1398+選択:4:1.9842,0
1399+優良サイト:5:0,2.1825
1400+オプション:7:2.1826,0
1401+取り込:6:2.1826,0
1402+order:10:0,2.1827
1403+行目:6:2.1826,0
1404+site+a:3:0,1.7907
1405+エントリー:12:0,2.1828
1406+自分で:5:1.7907,0
1407+EUC:3:1.7907,0
1408+info:17:0,2.1830
1409+ギャル:3:0,1.7907
1410+Thanks:11:0,2.1828
1411+generic:6:0,2.1826
1412+time:4:0,1.7907
1413+products:5:0,1.9842
1414+ソースを:7:2.1826,0
1415+願いしますhttp:6:0,2.1826
1416+今後:4:0,1.7907
1417+enjoyed:3:0,1.7907
1418+人達:3:0,1.7907
1419+致します:7:0,2.1826
1420+out:3:0,1.7907
1421+安心:20:0,2.1831
1422+プロフィール:13:0,2.1829
1423+一覧を:3:1.7907,0
1424+File+Spec:3:1.7907,0
1425+指摘:3:1.7907,0
1426+普通に:5:1.9842,0
1427+沢山の:3:0,1.7907
1428+年齢:7:0,2.1826
1429+今回:11:0,2.1827
1430+挿入プラグイン:3:1.7907,0
1431+パート編集:4:1.9842,0
1432+メールが:6:1.9842,0
1433+別に:5:1.9842,0
1434+a+a+href:10:0,2.1827
1435+過去:3:1.7907,0
1436+側の:3:1.7907,0
1437+and:18:0,2.1830
1438+サンプル:4:0,1.7907
1439+動作を:3:1.7907,0
1440+デフォルト:4:1.9842,0
1441+design:6:0,2.1826
1442+女性を選:3:0,1.7907
1443+欲しいですhttp:3:0,1.7907
1444+serebu+final:16:0,2.1830
1445+見て下:5:0,1.9842
1446+Spec:4:1.9842,0
1447+nnili:3:0,1.7907
1448+経験:9:0,2.1826
1449+Buy:4:0,1.9842
1450+月に:7:0,2.1826
1451+kotowaru投稿拒否A:4:0,1.9842
1452+object+method:3:1.7907,0
1453+サイズ:4:1.9842,0
1454+多い:3:0,1.7907
1455+choice:3:0,1.7907
1456+コチラ:6:0,2.1826
1457+見放題:6:0,2.1826
1458+素敵な出会:8:0,2.1826
1459+後に:5:1.7907,0
1460+申します:3:0,1.7907
1461+best+final+love:4:0,1.9842
1462+http+melkko:4:0,1.9842
1463+isweb:6:2.1826,0
1464+思っている:3:0,1.7907
1465+使い方:8:2.1826,0
1466+一度:8:0,2.1826
1467+文字列:5:2.1825,0
1468+リンク先:4:1.9842,0
1469+Great:4:0,1.9842
1470+Wiki+pm:7:2.1826,0
1471+女として:3:0,1.7907
1472+allegra:4:0,1.9842
1473+メールを:5:0,1.7907
1474+思ってます:8:0,2.1826
1475+cb402:6:0,2.1826
1476+_+m:3:1.7907,0
1477+members+lycos:5:0,2.1825
1478+wiki+cgi:25:2.1833,0
1479+phentermine+html:4:0,1.9842
1480+通りです:4:1.7907,0
1481+内の:7:2.1826,0
1482+以前:5:1.9842,0
1483+http+best+final:4:0,1.9842
1484+届けします:4:0,1.9842
1485+削除された:3:1.7907,0
1486+要望:6:0,1.9842
1487+広告:5:0,2.1825
1488+優良出会い:3:0,1.7907
1489+運用:4:1.9842,0
1490+付け加:3:1.7907,0
1491+一緒に:6:0,2.1826
1492+関係を:7:0,2.1826
1493+含む:3:1.7907,0
1494+サイトhttp:6:0,2.1826
1495+good+work:3:0,1.7907
1496+女性を:11:0,2.1828
1497+言います:5:0,2.1825
1498+スゴイ:3:0,1.7907
1499+男女:4:0,1.9842
1500+削除:12:2.1827,0
1501+pure+final:5:0,2.1825
1502+cb402+ath:6:0,2.1826
1503+全部見れます:3:0,1.7907
1504+without:3:0,1.7907
1505+参照してください:4:1.7907,0
1506+t+locate:4:1.9842,0
1507+修正します:3:1.7907,0
1508+自由に:4:0,1.7907
1509+分の:3:0,1.7907
1510+lib:15:2.1829,0
1511+開発:6:1.9842,0
1512+journal+phentermine:3:0,1.7907
1513+求めている:5:0,2.1825
1514+満載:4:0,1.9842
1515+適用:4:1.9842,0
1516+リスト:8:2.1826,0
1517+サイトに:7:0,2.1826
1518+エッチが:3:0,1.7907
1519+journal:3:0,1.7907
1520+モード:4:1.7907,0
1521+楽しめる:3:0,1.7907
1522+9825:3:0,1.7907
1523+dat:10:2.1827,0
1524+人妻:19:0,2.1831
1525+info+ia03kh11:3:0,1.7907
1526+buy:15:0,2.1829
1527+Good+design:4:0,1.9842
1528+wiki:40:2.1840,0
1529+好きな:4:0,1.9842
1530+adipex+a:4:0,1.9842
1531+prescription+url:4:0,1.9842
1532+仕事:8:0,2.1826
1533+ステータス:3:1.7907,0
1534+外部:4:1.9842,0
1535+項目:4:1.9842,0
1536+書き込:12:2.1827,0
1537+子から:3:0,1.7907
1538+Farm:8:2.1826,0
1539+ultram+url:3:0,1.7907
1540+致しますhttp:3:0,1.7907
1541+出会いの:3:0,1.7907
1542+確かに:5:1.9842,0
1543+club+net+pure:4:0,1.9842
1544+perfections+cx:3:0,1.7907
1545+表示する:3:1.7907,0
1546+zip:7:2.1826,0
1547+残念ながら:3:1.7907,0
1548+bbs2:3:1.7907,0
1549+like+your:3:0,1.7907
1550+達を:3:0,1.7907
1551+perl:13:2.1829,0
1552+今の:4:0,1.7907
1553+online+a+http:5:0,2.1825
1554+bin:6:1.9842,0
1555+恋人:5:0,2.1825
1556+http+melkko+net:4:0,1.9842
1557+保存:4:1.9842,0
1558+覧下:8:0,2.1826
1559+co+uk+kotowaru:4:0,1.9842
1560+mod_perl:5:2.1825,0
1561+一人:5:0,2.1825
1562+男性が:3:0,1.7907
1563+リンク:17:2.1830,0
1564+that:4:0,1.9842
1565+行頭に:3:1.7907,0
1566+必ず:7:0,2.1826
1567+味わえないですよ興味:3:0,1.7907
1568+ファイル:31:2.1836,0
1569+m+_:3:1.7907,0
1570+url+http:13:0,2.1829
1571+少ない出会:3:0,1.7907
1572+erectile:3:0,1.7907
1573+sexfriend:4:0,1.9842
1574+freexy:4:0,1.9842
1575+cheap:12:0,2.1828
1576+トップページ:3:1.7907,0
1577+dysfunction:3:0,1.7907
1578+more+than:3:0,1.7907
1579+素人:3:0,1.7907
1580+エッチ:28:0,2.1835
1581+味わえないですよ:3:0,1.7907
1582+女子校生23:3:0,1.7907
1583+カテゴリ内の:3:1.7907,0
1584+今すぐ:4:0,1.9842
1585+位置:3:1.7907,0
1586+メール送信:4:1.9842,0
1587+新しい:7:0,2.1825
1588+l+cx:4:0,1.9842
1589+間違:7:2.1825,0
1590+相手を探:4:0,1.9842
1591+jp+wiki:6:2.1826,0
1592+Perl5:4:1.9842,0
1593+女性:63:1.2337,2.1849
1594+盛り上:3:0,1.7907
1595+人気:9:0,2.1827
1596+MIME+Base64:5:2.1825,0
1597+所有者:4:1.9842,0
1598+Wikiの:3:1.7907,0
1599+like:9:0,2.1826
1600+精力剤+媚薬:3:0,1.7907
1601+男性から:3:0,1.7907
1602+動作しました:4:1.9842,0
1603+ディレクトリが:4:1.9842,0
1604+プラグイン側:3:1.7907,0
1605+言って:8:0,2.1826
1606+管理:10:2.1827,0
1607+ゲームの:4:0,1.7907
1608+綺麗:4:0,1.9842
1609+前の:5:1.9842,0
1610+100:11:0,2.1827
1611+同様の:9:2.1827,0
1612+とっびっきりの:3:0,1.7907
1613+入り:3:0,1.7907
1614+無い:4:1.7907,0
1615+簡単です:3:0,1.7907
1616+2ヶ:3:0,1.7907
1617+Wikiは:3:1.7907,0
1618+思って:5:0,2.1825
1619+プラグインを使用:3:1.7907,0
1620+濃厚なセックス:5:0,2.1825
1621+Wiki+pmに:3:1.7907,0
1622+index+php:3:0,1.7907
1623+textarea:3:1.7907,0
1624+写メ:8:0,2.1826
1625+ガンガンの:3:0,1.7907
1626+ゲーム:8:0,2.1826
1627+素敵:19:0,2.1831
1628+読み:4:1.9842,0
1629+形式で出力:3:1.7907,0
1630+mad:4:0,1.9842
1631+モジュール:10:2.1827,0
1632+最も:3:0,1.7907
1633+対象:6:1.9842,0
1634+人集めた:3:0,1.7907
1635+投稿:9:2.1826,0
1636+wiki+cgiの:8:2.1826,0
1637+url+3pZkFntcf6:3:0,1.7907
1638+スレを:3:0,1.7907
1639+net出会い:3:0,1.7907
1640+Parser+pm:3:1.7907,0
1641+www+nnili+com:3:0,1.7907
1642+参加しませんか余:3:0,1.7907
1643+nnili+com+bc:3:0,1.7907
1644+為にも:3:0,1.7907
1645+大人の関係:3:0,1.7907
1646+出来ます:4:0,1.7907
1647+最高:4:0,1.9842
1648+phentermine+html+url:3:0,1.7907
1649+know:3:0,1.7907
1650+Can+t+locate:4:1.9842,0
1651+金額:6:0,2.1826
1652+a+a:11:0,2.1828
1653+作って:5:1.9842,0
1654+報告:5:1.7907,0
1655+経験ない:3:0,1.7907
1656+色な:5:0,2.1825
1657+nobody:6:2.1826,0
1658+3pZkFntcf6:3:0,1.7907
1659+メンテ:3:1.7907,0
1660+23人集:3:0,1.7907
1661+web+fc2:5:0,2.1825
1662+html+free:3:0,1.7907
1663+200:4:0,1.9842
1664+女性達:5:0,2.1825
1665+満足:11:0,2.1828
1666+送受信:4:0,1.9842
1667+全部見:3:0,1.7907
1668+人生:4:0,1.9842
1669+優良出会:3:0,1.7907
1670+開催:4:0,1.9842
1671+違って:3:0,1.7907
1672+人の:8:0,2.1826
1673+woman+l+cx:4:0,1.9842
1674+Header:3:1.7907,0
1675+無駄な時間:3:0,1.7907
1676+a+buy:3:0,1.7907
1677+CGIを:3:1.7907,0
1678+素敵な方:3:0,1.7907
1679+3分:3:0,1.7907
1680+漢方薬:3:0,1.7907
1681+best:9:0,2.1827
1682+ディレクトリに:5:2.1825,0
1683+Can+t:5:2.1825,0
1684+club:4:0,1.9842
1685+他では中:3:0,1.7907
1686+Footerに入:4:1.9842,0
1687+電話:4:0,1.9842
1688+女性との:4:0,1.9842
1689+datを:3:1.7907,0
1690+3+html:5:0,2.1825
1691+Base64:5:2.1825,0
1692+メリット:4:1.9842,0
1693+search:5:1.9842,0
1694+セックス:19:0,2.1831
1695+今回は:5:0,2.1825
1696+修正:25:2.1833,0
1697+http+utfk+com:3:0,1.7907
1698+Footer:5:2.1825,0
1699+volny:3:0,1.7907
1700+リンクが:3:1.7907,0
1701+have:10:0,2.1827
1702+locate:4:1.9842,0
1703+using:3:0,1.7907
1704+下記の:4:0,1.7907
1705+Hな:5:0,2.1825
1706+テーブル:4:1.9842,0
1707+現在の:3:1.7907,0
1708+MIME:6:2.1826,0
1709+net+pure:4:0,1.9842
1710+プラグインと:3:1.7907,0
1711+セフレ:17:0,2.1830
1712+別の:7:2.1826,0
1713+最低:4:0,1.9842
1714+Cialis:4:0,1.9842
1715+系サイトをご:3:0,1.7907
1716+送信:7:2.1826,0
1717+添付:11:2.1827,0
1718+見て:8:0,2.1826
1719+タグ:9:2.1827,0
1720+outline:4:1.9842,0
1721+結婚:12:0,2.1828
1722+振込:3:0,1.7907
1723+世話:4:1.9842,0
1724+http+irete+info:4:0,1.9842
1725+メールアドレス:4:0,1.7907
1726+実際に出会:3:0,1.7907
1727+パーティーに:3:0,1.7907
1728+掲示板が:3:0,1.7907
1729+具体的には:3:1.7907,0
1730+中から:4:0,1.9842
1731+パッチを:3:1.7907,0
1732+カテゴリ:5:2.1825,0
1733+探し:3:0,1.7907
1734+期間限定:4:0,1.9842
1735+作った:3:1.7907,0
1736+up+the+good:3:0,1.7907
1737+セフレ探:3:0,1.7907
1738+23人集めた:3:0,1.7907
1739+今は:3:0,1.7907
1740+提供:17:0,2.1829
1741+バージョンアップ:9:2.1827,0
1742+合わせて:4:0,1.7907
1743+pmに:5:2.1825,0
1744+パート:5:2.1825,0
1745+男の:4:0,1.9842
1746+アップデート:4:1.9842,0
1747+編集を:4:1.9842,0
1748+html+http:7:0,2.1826
1749+エンコーディング:3:1.7907,0
1750+方http:3:0,1.7907
1751+777:5:2.1825,0
1752+有料:6:0,1.9842
1753+時間を:3:0,1.7907
1754+初めて:4:0,1.7907
1755+poi+jp:6:2.1826,0
1756+家に:3:0,1.7907
1757+価格:4:0,1.9842
1758+biz:13:0,2.1829
1759+中+味わえないですよ:3:0,1.7907
1760+願いいたします:6:2.1826,0
1761+男の人:4:0,1.9842
1762+大人の:8:0,2.1826
1763+苦労:3:0,1.7907
1764+管理画面:5:2.1825,0
1765+パス:4:1.9842,0
1766+buttobi:4:0,1.9842
1767+online+journal:3:0,1.7907
1768+教えてください:4:1.9842,0
1769+サイトを紹介:5:0,2.1825
1770+Perl:9:2.1827,0
1771+ページ内に:5:2.1825,0
1772+sex:4:0,1.9842
1773+子だけを集:3:0,1.7907
1774+5+10:3:1.7907,0
1775+募集:6:0,2.1826
1776+19歳:3:0,1.7907
1777+恋愛:5:0,2.1825
1778+freexy+net:4:0,1.9842
1779+上がる:3:0,1.7907
1780+html+cheap:5:0,2.1825
1781+not:4:0,1.9842
1782+最新版:3:1.7907,0
1783+日本語:3:1.7907,0
1784+ココ:10:0,2.1827
1785+激しく:3:0,1.7907
1786+結果:4:0,1.7907
1787+Wikiを:6:2.1826,0
1788+欲求を:4:0,1.9842
1789+I+like+this:4:0,1.9842
1790+本物:7:0,2.1826
1791+pill+a:3:0,1.7907
1792+本当にお:3:0,1.7907
1793+乱交:6:0,2.1826
1794+t+locate+object:3:1.7907,0
1795+時間で:3:0,1.7907
1796+online+url:8:0,2.1826
1797+変更:21:2.1832,0
1798+無料で:16:0,2.1830
1799+posts:3:0,1.7907
1800+同様に:3:1.7907,0
1801+SEX:6:0,2.1826
1802+Keep:4:0,1.9842
1803+現状:7:2.1826,0
1804+32歳:3:0,1.7907
1805+4+html:3:0,1.7907
1806+ファイルが:5:2.1825,0
1807+割り:16:0,2.1830
1808+場合など:3:1.7907,0
1809+http+sky+hart:5:0,2.1825
1810+家庭を:3:0,1.7907
1811+pill:5:0,2.1825
1812+your:15:0,2.1829
1813+url+a+href:9:0,2.1827
1814+詳細:12:0,2.1827
1815+http+members+lycos:5:0,2.1825
1816+prescription:6:0,2.1826
1817+online+url+http:3:0,1.7907
1818+不可:3:1.7907,0
1819+woman:5:0,2.1825
1820+エラー:21:2.1832,0
1821+投稿拒否A:4:0,1.9842
1822+男性の方:5:0,2.1825
1823+vboya+h+fc2:3:0,1.7907
1824+無駄な:3:0,1.7907
1825+via:3:1.7907,0
1826+Good+design+http:3:0,1.7907
1827+探して:5:0,1.9842
1828+http+vlzh:12:0,2.1828
1829+処理:5:2.1825,0
1830+安全:8:0,2.1826
1831+参考に:5:1.7907,0
1832+必要があります:5:2.1825,0
1833+サイトから:4:0,1.9842
1834+BugTrack:16:2.1830,0
1835+写真が全部見:3:0,1.7907
1836+出ました:5:2.1825,0
1837+http+www+cgimembera:3:0,1.7907
1838+気軽:6:0,2.1826
1839+紹介:26:0,2.1833
1840+相手を:7:0,2.1826
1841+沢山:4:0,1.9842
1842+記述します:3:1.7907,0
1843+内部:3:1.7907,0
1844+出会いを:14:0,2.1829
1845+s1+freexy+net:4:0,1.9842
1846+http+vboya:3:0,1.7907
1847+site+a+href:3:0,1.7907
1848+order+ultram+url:3:0,1.7907
1849+保存時:3:1.7907,0
1850+アポ:3:0,1.7907
1851+エッチ経験:3:0,1.7907
1852+料金:4:0,1.9842
1853+web:9:0,2.1827
1854+考えてみます:3:1.7907,0
1855+via+package:3:1.7907,0
1856+sex+http:3:0,1.7907
1857+log:3:1.7907,0
1858+セレブ:12:0,2.1828
1859+CHANEL:3:0,1.7907
1860+女子校生23人集:3:0,1.7907
1861+データを:3:1.7907,0
1862+最初は:6:0,2.1825
1863+puki:3:1.7907,0
1864+小遣:4:0,1.9842
1865+around:3:0,1.7907
1866+http+best:5:0,2.1825
1867+開発版:5:2.1825,0
1868+GPL:4:1.9842,0
1869+buy+phentermine:5:0,2.1825
1870+頃は:3:0,1.7907
1871+見出し:5:2.1825,0
1872+全ページ:3:1.7907,0
1873+現象:7:2.1826,0
1874+Very+good+site:4:0,1.9842
1875+5+html:3:0,1.7907
1876+a+http+www:5:0,2.1825
1877+phentermine+url:6:0,2.1826
1878+万円:3:0,1.7907
1879+早速:4:1.7907,0
1880+quizilla+com:3:0,1.7907
1881+locate+object:3:1.7907,0
1882+修正を:5:2.1825,0
1883+web+site:4:0,1.9842
1884+メ見放題:4:0,1.9842
1885+org+http:4:0,1.9842
1886+Nice:8:0,2.1826
1887+私と:5:0,2.1825
1888+無料です:3:0,1.7907
1889+金が掛:3:0,1.7907
1890+作成する:4:1.9842,0
1891+可愛い女子校生:3:0,1.7907
1892+作れば:4:1.7907,0
1893+以上:9:0,2.1826
1894+slots:4:0,1.9842
1895+全角:3:1.7907,0
1896+BugTrack+plugin:12:2.1828,0
1897+love:30:0,2.1836
1898+複数:8:2.1826,0
1899+Farmの:4:1.9842,0
1900+設定で:3:1.7907,0
1901+Software+error:3:1.7907,0
1902+ダイエット:6:0,2.1826
1903+探してます:4:0,1.9842
1904+出会い系:21:0,2.1831
1905+http+love:3:0,1.7907
1906+real:5:0,2.1825
1907+FSWikiの:9:2.1827,0
1908+優先:3:1.7907,0
1909+www+cgimembera:3:0,1.7907
1910+ヘルプを:3:1.7907,0
1911+プラグインの:11:2.1828,0
1912+etc:3:0,1.7907
1913+プラグインBugTrack:3:1.7907,0
1914+女として見:3:0,1.7907
1915+不満を:4:0,1.9842
1916+気に入:5:1.7907,0
1917+サイトの:10:0,2.1827
1918+修正しました:3:1.7907,0
1919+思うのですが:9:2.1826,0
1920+ソース:14:2.1829,0
1921+テレビ:3:0,1.7907
1922+his:3:0,1.7907
1923+HTMLタグ:4:1.9842,0
1924+Best:3:0,1.7907
1925+ペース:4:0,1.9842
1926+見た:6:0,2.1826
1927+fc2:9:0,2.1827
1928+用の:6:2.1825,0
1929+ultram+order:3:0,1.7907
1930+支払:4:0,1.9842
1931+対策:6:2.1826,0
1932+エラーが発生:3:1.7907,0
1933+サーバー:7:2.1826,0
1934+ultram+url+http:3:0,1.7907
1935+メールが送:3:1.7907,0
1936+駄目:4:1.9842,0
1937+their:5:0,2.1825
1938+pagename:3:1.7907,0
1939+lib+Wiki:5:2.1825,0
1940+プラグインです:4:1.9842,0
1941+写真が:6:0,2.1826
1942+消せない:3:1.7907,0
1943+フォーム:9:2.1826,0
1944+Apache:3:1.7907,0
1945+部屋:3:0,1.7907
1946+2+html:4:0,1.9842
1947+失敗:5:1.7907,0
1948+Very+good:4:0,1.9842
1949+試し下:3:0,1.7907
1950+CGI+pm:5:2.1825,0
1951+http+serebu+final:16:0,2.1830
1952+コピー:9:2.1826,0
1953+作成しました:5:2.1825,0
1954+アドバイス:3:1.7907,0
1955+yummycats+net:15:0,2.1829
1956+チャンス:4:0,1.9842
1957+主婦:4:0,1.9842
1958+パーティーに参加:3:0,1.7907
1959+場合の:3:1.7907,0
1960+頂きます:3:0,1.7907
1961+young:3:0,1.7907
1962+スタッフ:8:0,2.1826
1963+女の:8:0,2.1826
1964+commentプラグイン:4:1.9842,0
1965+協力:4:0,1.7907
1966+phentermine+online:7:0,2.1826
1967+co+uk:5:0,2.1825
1968+以下:19:2.1830,0
1969+改行:5:2.1825,0
1970+co+jp:4:1.9842,0
1971+知り:6:0,2.1825
1972+楽しみ:3:0,1.7907
1973+friend:3:0,1.7907
1974+GET:3:0,1.7907
1975+org+Members:3:0,1.7907
1976+CGI:17:2.1830,0
1977+Keep+up:3:0,1.7907
1978+すみません:3:1.7907,0
1979+コメントアウト:9:2.1827,0
1980+違う:8:0,2.1826
1981+思います:70:2.1845,2.1831
1982+http:313:2.1831,2.1945
1983+index:12:1.7907,2.1827
1984+中の:8:2.1825,1.7907
1985+発生:10:2.1826,1.7907
1986+携帯:10:1.7907,2.1826
1987+サイト:71:2.1826,2.1849
1988+com:133:1.6014,2.1877
1989+現在:9:2.1826,1.7907
1990+場合:53:2.1841,2.1827
1991+問題:29:2.1834,1.7907
1992+href:52:1.2337,2.1845
1993+全部見れます他:3:0,1.7907
1994+主人には:3:0,1.7907
1995+Wiki:45:2.1842,0
1996+good+site+Thanks:4:0,1.9842
1997+電話番号:5:0,2.1825
1998+Thank+you:4:0,1.9842
1999+our:5:0,2.1825
2000+サイトは:16:0,2.1830
2001+levitra+a:3:0,1.7907
2002+Jcode+pm:4:1.9842,0
2003+女性の:11:0,2.1828
2004+返事:12:1.7907,2.1827
2005+設定:24:2.1832,1.7907
2006+時に:8:1.7907,2.1825
2007+是非:12:1.7907,2.1827
2008+http+www:77:1.9842,2.1853
2009+ページ:52:2.1844,1.6014
2010+特に:8:2.1825,1.7907
2011+www:84:2.1826,2.1855
2012+同じ:19:2.1830,1.7907
2013+with:10:1.7907,2.1826
2014+込み:8:2.1825,1.7907
2015+非常に:8:1.7907,2.1825
2016+org:21:1.7907,2.1831
2017+実際に:8:1.7907,2.1825
--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/bbs.pm
@@ -0,0 +1,207 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）
4+#（bbsプラグインのオーバーライド）
5+#
6+##########################################################################################
7+use strict;
8+
9+use plugin::bbs::BBSHandler;
10+use plugin::bbs::BBS2Handler;
11+
12+# plugin::bbs::BBSHandlerのdo_actionメソッドの置き換え
13+package plugin::bbs::BBSHandler;
14+
15+sub do_action {
16+ my $self = shift;
17+ my $wiki = shift;
18+ my $cgi = $wiki->get_CGI;
19+
20+ my $name = $cgi->param("name");
21+ my $subject = $cgi->param("subject");
22+ my $message = $cgi->param("message");
23+ my $count = $cgi->param("count");
24+ my $page = $cgi->param("page");
25+ my $option = $cgi->param("option");
26+
27+ if($name eq ""){
28+ $name = "名無しさん";
29+ } else {
30+ # fswiki_post_nameというキーでクッキーをセットする
31+ my $path = &Util::cookie_path($wiki);
32+ my $cookie = $cgi->cookie(-name=>'fswiki_post_name',-value=>Util::url_encode($name),-expires=>'+1M',-path=>$path);
33+ print "Set-Cookie: ",$cookie->as_string,"\n";
34+ }
35+
36+ if($subject eq ""){
37+ $subject = "無題";
38+ }
39+
40+ if($page eq "" || $count eq ""){
41+ return $wiki->error("パラメータが不正です");
42+ } elsif($message eq ""){
43+ return $wiki->error("本文を入力してください。");
44+ }
45+
46+#--------------------------------------------------------------------------------------------------
47+ if($message){
48+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($message)){
49+ my $time = Util::format_date(time());
50+ my $file = $wiki->config('log_dir')."/spam_bbs.txt";
51+ if(open(SPAM_LOG, ">>$file")){
52+ print SPAM_LOG "-" x 70 . "\n";
53+ print SPAM_LOG "$page:$subject - $name ($time)\n";
54+ print SPAM_LOG "-" x 70 . "\n";
55+ print SPAM_LOG "$message\n";
56+ close(SPAM_LOG);
57+ }
58+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
59+ $subject = Util::escapeHTML($subject);
60+ $message = Util::escapeHTML($message);
61+ $message =~ s/\n/<br>/g;
62+ $error_message .= "<p>\n";
63+ $error_message .= "<div>投稿された文章：</div>\n";
64+ $error_message .= "<div>＜件名＞</div>\n";
65+ $error_message .= "<div>$subject</div>\n";
66+ $error_message .= "<div>＜本文＞</div>\n";
67+ $error_message .= "<div>$message</div>\n";
68+ $error_message .= "</p>\n";
69+ return $error_message;
70+ }
71+ }
72+#--------------------------------------------------------------------------------------------------
73+
74+ # フォーマットプラグインへの対応
75+ my $format = $wiki->get_edit_format();
76+ $name = $wiki->convert_to_fswiki($name ,$format,1);
77+ $subject = $wiki->convert_to_fswiki($subject,$format,1);
78+ $message = $wiki->convert_to_fswiki($message,$format);
79+
80+ my @lines = split(/\n/,$wiki->get_page($page));
81+ my $flag = 0;
82+ my $form_count = 1;
83+ my $content = "";
84+
85+ foreach(@lines){
86+ $content = $content.$_."\n";
87+ if(/^\{\{bbs\s*.*\}\}$/ && $flag==0){
88+ if($form_count==$count){
89+ $content .= "!!$subject - $name (".&Util::format_date(time()).")\n".
90+ "$message\n";
91+
92+ # no_commentオプション
93+ if($option eq "no_comment"){
94+
95+ # reverse_commentオプション
96+ } elsif($option eq "reverse_comment"){
97+ $content .= "{{comment reverse}}\n";
98+ # デフォルト
99+ } else {
100+ $content .= "{{comment}}\n";
101+ }
102+ $flag = 1;
103+
104+ } else {
105+ $form_count++;
106+ }
107+ }
108+ }
109+ if($flag==1){
110+ $wiki->save_page($page,$content);
111+ }
112+
113+ # 元のページにリダイレクトする
114+ $wiki->redirect($page);
115+}
116+
117+
118+# plugin::bbs::BBS2Handlerのdo_actionメソッドの置き換え
119+package plugin::bbs::BBS2Handler;
120+
121+sub do_action {
122+ my $self = shift;
123+ my $wiki = shift;
124+ my $cgi = $wiki->get_CGI;
125+
126+ my $bbsname = $cgi->param("bbsname");
127+ my $name = $cgi->param("name");
128+ my $subject = $cgi->param("subject");
129+ my $message = $cgi->param("message");
130+ my $page = $cgi->param("page");
131+ my $option = $cgi->param("option");
132+
133+ if($name eq ""){
134+ $name = "名無しさん";
135+ } else {
136+ # fswiki_post_nameというキーでクッキーをセットする
137+ my $path = &Util::cookie_path($wiki);
138+ my $cookie = $cgi->cookie(-name=>'fswiki_post_name',-value=>Util::url_encode($name),-expires=>'+1M',-path=>$path);
139+ print "Set-Cookie: ",$cookie->as_string,"\n";
140+ }
141+
142+ if($subject eq ""){
143+ $subject = "無題";
144+ }
145+
146+ if($bbsname eq ""){
147+ return $wiki->error("パラメータが不正です。");
148+ }
149+ if($message eq ""){
150+ return $wiki->error("本文を入力してください。");
151+ }
152+
153+#--------------------------------------------------------------------------------------------------
154+ if($message){
155+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($message)){
156+ my $time = Util::format_date(time());
157+ my $file = $wiki->config('log_dir')."/spam_bbs2.txt";
158+ if(open(SPAM_LOG, ">>$file")){
159+ print SPAM_LOG "-" x 70 . "\n";
160+ print SPAM_LOG "$bbsname:$subject - $name ($time)\n";
161+ print SPAM_LOG "-" x 70 . "\n";
162+ print SPAM_LOG "$message\n";
163+ close(SPAM_LOG);
164+ }
165+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
166+ $subject = Util::escapeHTML($subject);
167+ $message = Util::escapeHTML($message);
168+ $message =~ s/\n/<br>/g;
169+ $error_message .= "<p>\n";
170+ $error_message .= "<div>投稿された文章：</div>\n";
171+ $error_message .= "<div>＜件名＞</div>\n";
172+ $error_message .= "<div>$subject</div>\n";
173+ $error_message .= "<div>＜本文＞</div>\n";
174+ $error_message .= "<div>$message</div>\n";
175+ $error_message .= "</p>\n";
176+ return $error_message;
177+ }
178+ }
179+#--------------------------------------------------------------------------------------------------
180+
181+ # フォーマットプラグインへの対応
182+ my $format = $wiki->get_edit_format();
183+ $name = $wiki->convert_to_fswiki($name ,$format,1);
184+ $subject = $wiki->convert_to_fswiki($subject,$format,1);
185+ $message = $wiki->convert_to_fswiki($message,$format);
186+
187+ my $pagename = $self->get_page_name($wiki,$bbsname);
188+ my $content = "!![[$subject|$pagename]] - $name (".&Util::format_date(time()).")\n".
189+ "$message\n";
190+
191+ # no_commentオプション
192+ if($option eq "no_comment"){
193+
194+ # reverse_commentオプション
195+ } elsif($option eq "reverse_comment"){
196+ $content .= "{{comment reverse}}\n";
197+ # デフォルト
198+ } else {
199+ $content .= "{{comment}}\n";
200+ }
201+ $wiki->save_page($pagename,$content);
202+
203+ # 元のページにリダイレクト
204+ $wiki->redirect($pagename);
205+}
206+
207+1;
--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/bbsx.pm
@@ -0,0 +1,253 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）
4+#（bbsxプラグインのオーバーライド）
5+#
6+##########################################################################################
7+use strict;
8+
9+use plugin::bbsx::BBSXHandler;
10+
11+# plugin::bbsx::BBSXHandlerのdo_actionメソッドの置き換え
12+package plugin::bbsx::BBSXHandler;
13+
14+sub do_action {
15+ my $self = shift;
16+ my $wiki = shift;
17+ my $cgi = $wiki->get_CGI;
18+
19+ my $bbsname = $cgi->param("bbsname");
20+ my $name = $cgi->param("name");
21+ my $subject = $cgi->param("subject");
22+ my $message = $cgi->param("message");
23+ my $password = $cgi->param("password");
24+ my $page = $cgi->param("page");
25+ my $option = $cgi->param("option");
26+ my $filename = $cgi->param("file");
27+ my $uploadable = $cgi->param("uploadable");
28+
29+ if($name eq ""){
30+ $name = "名無しさん";
31+ } else {
32+ # post_nameというキーでクッキーをセットする
33+ my $cookie = $cgi->cookie(-name=>'post_name',-value=>$name,-expires=>'+1M');
34+ print "Set-Cookie: ",$cookie->as_string,"\n";
35+ }
36+
37+ if($subject eq ""){
38+ $subject = "無題";
39+ }
40+
41+ if($bbsname eq ""){
42+ return $wiki->error("パラメータが不正です。");
43+ }
44+
45+ if($uploadable eq 'yes'){
46+ if($message eq "" and $filename eq ""){
47+ return $wiki->error("本文か添付ファイルを指定してください。");
48+ }
49+ } else {
50+ if($message eq ""){
51+ return $wiki->error("本文を入力してください。");
52+ }
53+ }
54+
55+ if($password eq ""){
56+ return $wiki->error("削除キーを入力してください。");
57+ }
58+
59+ my $pagename = $self->get_page_name($wiki,$bbsname);
60+
61+ my $refpart='';
62+
63+ if($filename ne ""){
64+ $filename =~ s/\\/\//g;
65+ $filename = substr($filename,rindex($filename,"/")+1);
66+ &Jcode::convert(\$filename,'euc');
67+
68+ my $hundle = $cgi->upload("file");
69+ my $filecont;
70+ while(<$hundle>){ $filecont = $filecont.$_; }
71+ my $uploadfileNP = &Util::url_encode($pagename).".".&Util::url_encode($filename);
72+ my $uploadfile = $wiki->config('attach_dir')."/".$uploadfileNP;
73+ open(DATA,">$uploadfile") or die $!;
74+ binmode(DATA);
75+ print DATA $filecont;
76+ close(DATA);
77+ # ログの記録
78+ &plugin::attach::AttachHandler::write_log($wiki,"UPLOAD",$pagename,$filename);
79+
80+ # 添付ファイルの表示形式判定
81+
82+ my ($is_image,$infostring,$width,$height) = $self->getfileinfo($wiki,$uploadfile);
83+ if($is_image){
84+ $refpart = "{{bbsxfile $filename,show=1,page=$pagename,width=$width,height=$height,border=0}}\n";
85+ } else {
86+ my ($size) = (stat($uploadfile))[7];
87+ $refpart = "{{bbsxfile $filename,show=0,page=$pagename,size=$size}}\n";
88+ }
89+ if($plugin::bbsx::BBSXHandler::WRITEINFO){
90+ $refpart .= "$infostring\n";
91+ }
92+
93+ }
94+
95+ my $addr = $ENV{'REMOTE_ADDR'};
96+ my $content = "!![[$subject|$pagename]] - $name (".&Util::format_date(time()).")\n";
97+
98+ if($refpart ne ""){
99+ $content .= "$refpart";
100+ }
101+ if($message ne ""){
102+ $content .= "\n$message\n";
103+ }
104+
105+#--------------------------------------------------------------------------------------------------
106+ if($message){
107+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($message)){
108+ my $time = Util::format_date(time());
109+ my $file = $wiki->config('log_dir')."/spam_bbsx.txt";
110+ if(open(SPAM_LOG, ">>$file")){
111+ print SPAM_LOG "-" x 70 . "\n";
112+ print SPAM_LOG "$bbsname:$subject - $name ($time)\n";
113+ print SPAM_LOG "-" x 70 . "\n";
114+ print SPAM_LOG "$message\n";
115+ close(SPAM_LOG);
116+ }
117+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
118+ $subject = Util::escapeHTML($subject);
119+ $message = Util::escapeHTML($message);
120+ $message =~ s/\n/<br>/g;
121+ $error_message .= "<p>\n";
122+ $error_message .= "<div>投稿された文章：</div>\n";
123+ $error_message .= "<div>＜件名＞</div>\n";
124+ $error_message .= "<div>$subject</div>\n";
125+ $error_message .= "<div>＜本文＞</div>\n";
126+ $error_message .= "<div>$message</div>\n";
127+ $error_message .= "</p>\n";
128+ return $error_message;
129+ }
130+ }
131+#--------------------------------------------------------------------------------------------------
132+
133+ $content .= "//IP=$addr\n";
134+ # パスワード記録
135+ $content .= "{{bbsxpassword $pagename," . crypt($password, 'aa') . "}}\n";
136+
137+ # no_commentオプション
138+ if($option eq "no_comment"){
139+
140+ # reverse_commentオプション
141+ } elsif($option eq "reverse_comment"){
142+ $content .= "{{bbsxcomment reverse}}\n";
143+ # デフォルト
144+ } else {
145+ $content .= "{{bbsxcomment}}\n";
146+ }
147+ $wiki->save_page($pagename,$content);
148+
149+ # 元のページにリダイレクト
150+ $wiki->redirect($bbsname);
151+}
152+
153+use plugin::bbsx::BBSXCommentHandler;
154+
155+# plugin::bbsx::BBSXCommentHandlerのdo_actionメソッドの置き換え
156+package plugin::bbsx::BBSXCommentHandler;
157+
158+sub do_action {
159+ my $self = shift;
160+ my $wiki = shift;
161+ my $cgi = $wiki->get_CGI;
162+
163+ my $name = $cgi->param("name");
164+ my $message = $cgi->param("message");
165+ my $count = $cgi->param("count");
166+ my $page = $cgi->param("page");
167+ my $option = $cgi->param("option");
168+
169+ if($name eq ""){
170+ $name = "名無しさん";
171+ } else {
172+ # post_nameというキーでクッキーをセットする
173+ my $cookie = $cgi->cookie(-name=>'post_name',-value=>$name,-expires=>'+1M');
174+ print "Set-Cookie: ",$cookie->as_string,"\n";
175+ }
176+
177+#--------------------------------------------------------------------------------------------------
178+ if($message){
179+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($message)){
180+ my $time = Util::format_date(time());
181+ my $file = $wiki->config('log_dir')."/spam_bbsx_comment.txt";
182+ if(open(SPAM_LOG, ">>$file")){
183+ print SPAM_LOG "$page:$message - $name($time)\n";
184+ close(SPAM_LOG);
185+ }
186+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
187+ $error_message .= "<p>\n";
188+ $error_message .= "<div>投稿された文章：</div>\n";
189+ $error_message .= "<div>" . Util::escapeHTML("$message") . "</div>\n";
190+ $error_message .= "</p>\n";
191+ return $error_message;
192+ }
193+ }
194+#--------------------------------------------------------------------------------------------------
195+
196+ if($page ne "" && $message ne "" && $count ne ""){
197+
198+ my @lines = split(/\n/,$wiki->get_page($page));
199+ my $flag = 0;
200+ my $form_count = 1;
201+ my $content = "";
202+
203+ my $addr = $ENV{'REMOTE_ADDR'};
204+
205+ # 新着順の場合
206+ if($option eq "reverse"){
207+ foreach(@lines){
208+ if(/^{{bbsxpassword\s*.*}}$/){
209+ # パスワード行を削除
210+ next;
211+ }
212+ $content = $content.$_."\n";
213+ if(/^{{bbsxcomment\s*.*}}$/ && $flag==0){
214+ if($form_count==$count){
215+ $content = $content."*$message - $name (".Util::format_date(time()).")\n";
216+ $flag = 1;
217+ $content = $content."//IP=$addr\n";
218+ } else {
219+ $form_count++;
220+ }
221+ }
222+
223+ }
224+ # 投稿順の場合
225+ } else {
226+ foreach(@lines){
227+ if(/^{{bbsxpassword\s*.*}}$/){
228+ # パスワード行を削除
229+ next;
230+ }
231+ if(/^{{bbsxcomment\s*.*}}$/ && $flag==0){
232+ if($form_count==$count){
233+ $content = $content."*$message - $name (".Util::format_date(time()).")\n";
234+ $flag = 1;
235+ $content = $content."//IP=$addr\n";
236+ } else {
237+ $form_count++;
238+ }
239+ }
240+ $content = $content.$_."\n";
241+ }
242+ }
243+ if($flag==1){
244+ $wiki->save_page($page,$content);
245+ }
246+ }
247+
248+ my $bbsname = &plugin::bbsx::BBSXCommon::get_bbsname($wiki,$page);
249+ # 元のページにリダイレクト
250+ $wiki->redirect($bbsname);
251+}
252+
253+1;
--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/bugtrack.pm
@@ -0,0 +1,96 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）
4+#（bugtrackプラグインのオーバーライド）
5+#
6+##########################################################################################
7+use strict;
8+
9+use plugin::bugtrack::BugTrackHandler;
10+
11+# plugin::bugtrack::BugTrackHandlerのdo_actionメソッドの置き換え
12+package plugin::bugtrack::BugTrackHandler;
13+
14+sub do_action {
15+ my $self = shift;
16+ my $wiki = shift;
17+ my $cgi = $wiki->get_CGI;
18+
19+ my $project = $cgi->param("project");
20+ my $name = $cgi->param("name");
21+ my $category = $cgi->param("category");
22+ my $priority = $cgi->param("priority");
23+ my $status = $cgi->param("status");
24+ my $content = $cgi->param("content");
25+ my $subject = $cgi->param("subject");
26+ my $time = time();
27+
28+ if($name eq ""){
29+ return $wiki->error("名前が入力されていません。");
30+ } elsif($subject eq ""){
31+ return $wiki->error("サマリが入力されていません。");
32+ } elsif($content eq ""){
33+ return $wiki->error("バグ内容が入力されていません。");
34+ }
35+
36+ # fswiki_post_nameというキーでクッキーをセットする
37+ my $path = &Util::cookie_path($wiki);
38+ my $cookie = $cgi->cookie(-name=>'fswiki_post_name',-value=>Util::url_encode($name),-expires=>'+1M',-path=>$path);
39+ print "Set-Cookie: ",$cookie->as_string,"\n";
40+
41+#--------------------------------------------------------------------------------------------------
42+ if($content){
43+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($content)){
44+ my $time = Util::format_date(time());
45+ my $file = $wiki->config('log_dir')."/spam_bugtrack.txt";
46+ if(open(SPAM_LOG, ">>$file")){
47+ print SPAM_LOG "-" x 70 . "\n";
48+ print SPAM_LOG "$project:$name:$category:$priority:$status:$time\n";
49+ print SPAM_LOG "-" x 70 . "\n";
50+ print SPAM_LOG "$content\n";
51+ close(SPAM_LOG);
52+ }
53+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
54+ $subject = Util::escapeHTML($subject);
55+ $content = Util::escapeHTML($content);
56+ $content =~ s/\n/<br>/g;
57+ $error_message .= "<p>\n";
58+ $error_message .= "<div>投稿された文章：</div>\n";
59+ $error_message .= "<div>＜投稿者＞$name</div>\n";
60+ $error_message .= "<div>＜カテゴリ＞$category</div>\n";
61+ $error_message .= "<div>＜優先度＞$priority</div>\n";
62+ $error_message .= "<div>＜状態＞$status</div>\n";
63+ $error_message .= "<div>＜日時＞$time</div>\n";
64+ $error_message .= "<div>＜本文＞</div>\n";
65+ $error_message .= "<div>$content</div>\n";
66+ $error_message .= "</p>\n";
67+ return $error_message;
68+ }
69+ }
70+#--------------------------------------------------------------------------------------------------
71+
72+ # フォーマットプラグインへの対応
73+ my $format = $wiki->get_edit_format();
74+ $name = $wiki->convert_to_fswiki($name ,$format,1);
75+ $category = $wiki->convert_to_fswiki($category,$format,1);
76+ $priority = $wiki->convert_to_fswiki($priority,$format,1);
77+ $status = $wiki->convert_to_fswiki($status ,$format,1);
78+ $content = $wiki->convert_to_fswiki($content ,$format);
79+
80+ my $page = $self->make_pagename($wiki,$project);
81+
82+ $content = "!!!$subject\n".
83+ "*投稿者： $name\n".
84+ "*カテゴリ： $category\n".
85+ "*優先度： $priority\n".
86+ "*状態： $status\n".
87+ "*日時： ".Util::format_date($time)."\n".
88+ "{{bugstate}}\n".
89+ "!!内容\n".$content."\n".
90+ "!!コメント\n{{comment}}";
91+
92+ $wiki->save_page($page,$content);
93+ $wiki->redirect($page);
94+}
95+
96+1;
--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/comment.pm
@@ -0,0 +1,114 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）
4+#（commentプラグインのオーバーライド）
5+#
6+##########################################################################################
7+use strict;
8+
9+use plugin::comment::CommentHandler;
10+
11+# plugin::comment::CommentHandlerのdo_actionメソッドの置き換え
12+package plugin::comment::CommentHandler;
13+
14+sub do_action {
15+ my $self = shift;
16+ my $wiki = shift;
17+ my $cgi = $wiki->get_CGI;
18+
19+ my $name = $cgi->param("name");
20+ my $message = $cgi->param("message");
21+ my $count = $cgi->param("count");
22+ my $page = $cgi->param("page");
23+ my $option = $cgi->param("option");
24+
25+ if(!$wiki->can_show($page)){
26+ return $wiki->error("ページの参照権限がありません。");
27+ }
28+
29+#--------------------------------------------------------------------------------------------------
30+ if($message){
31+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($message)){
32+ my $time = Util::format_date(time());
33+ my $file = $wiki->config('log_dir')."/spam_comment.txt";
34+ if(open(SPAM_LOG, ">>$file")){
35+ print SPAM_LOG "$page:$message - $name($time)\n";
36+ close(SPAM_LOG);
37+ }
38+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
39+ $error_message .= "<p>\n";
40+ $error_message .= "<div>投稿された文章：</div>\n";
41+ $error_message .= "<div>" . Util::escapeHTML("$message") . "</div>\n";
42+ $error_message .= "</p>\n";
43+ return $error_message;
44+ }
45+ }
46+#--------------------------------------------------------------------------------------------------
47+
48+ if($name eq ""){
49+ $name = "名無しさん";
50+ } else {
51+ # fswiki_post_nameというキーでクッキーをセットする
52+ my $path = &Util::cookie_path($wiki);
53+ my $cookie = $cgi->cookie(-name=>'fswiki_post_name',-value=>Util::url_encode($name),-expires=>'+1M',-path=>$path);
54+ print "Set-Cookie: ",$cookie->as_string,"\n";
55+ }
56+
57+ # フォーマットプラグインへの対応
58+ my $format = $wiki->get_edit_format();
59+ $name = $wiki->convert_to_fswiki($name ,$format,1);
60+ $message = $wiki->convert_to_fswiki($message,$format,1);
61+
62+ if($page ne "" && $message ne "" && $count ne ""){
63+
64+ my @lines = split(/\n/,$wiki->get_page($page));
65+ my $flag = 0;
66+ my $form_count = 1;
67+ my $content = "";
68+
69+ foreach(@lines){
70+ # 新着順の場合
71+ if($option eq "reverse"){
72+ $content = $content.$_."\n";
73+ if(/^\{\{comment\s*.*\}\}$/ && $flag==0){
74+ if($form_count==$count){
75+ $content = $content."*$message - $name (".Util::format_date(time()).")\n";
76+ $flag = 1;
77+ } else {
78+ $form_count++;
79+ }
80+ }
81+ # ページ末尾に追加の場合
82+ } elsif($option eq "tail"){
83+ $content = $content.$_."\n";
84+
85+ # 投稿順の場合
86+ } else {
87+ if(/^\{\{comment\s*.*\}\}$/ && $flag==0){
88+ if($form_count==$count){
89+ $content = $content."*$message - $name (".Util::format_date(time()).")\n";
90+ $flag = 1;
91+ } else {
92+ $form_count++;
93+ }
94+ }
95+ $content = $content.$_."\n";
96+ }
97+ }
98+
99+ # ページ末尾に追加の場合は最後に追加
100+ if($option eq "tail" && check_comment($wiki, 'Footer')){
101+ $content = $content."*$message - $name (".Util::format_date(time()).")\n";
102+ $flag = 1;
103+ }
104+
105+ if($flag==1){
106+ $wiki->save_page($page,$content);
107+ }
108+ }
109+
110+ # 元のページにリダイレクト
111+ $wiki->redirect($page);
112+}
113+
114+1;
--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/core.pm
@@ -0,0 +1,216 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）
4+#（core::EditPageプラグイン（ページの編集）のオーバーライド）
5+#
6+##########################################################################################
7+use strict;
8+
9+use plugin::core::EditPage;
10+
11+# plugin::core::EditPageのdo_actionメソッドの置き換え
12+package plugin::core::EditPage;
13+
14+sub do_action {
15+ my $self = shift;
16+ my $wiki = shift;
17+ my $cgi = $wiki->get_CGI;
18+
19+ my $pagename = $cgi->param("page");
20+ my $format = $wiki->get_edit_format();
21+ my $content = $cgi->param("content");
22+ my $sage = $cgi->param("sage");
23+ my $template = $cgi->param("template");
24+ my $artno = $cgi->param("artno");
25+ my $time = $wiki->get_last_modified($pagename);
26+
27+ my $buf = "";
28+ my $login = $wiki->get_login_info();
29+
30+ if($pagename eq ""){
31+ return $wiki->error("ページが指定されていません。");
32+ }
33+ if($pagename =~ /([\|\[\]])|^:|([^:]:[^:])/){
34+ return $wiki->error("ページ名に使用できない文字が含まれています。");
35+ }
36+ if(!$wiki->can_modify_page($pagename)){
37+ return $wiki->error("ページの編集は許可されていません。");
38+ }
39+
40+ #--------------------------------------------------------------------------
41+ # 保存処理
42+ if($cgi->param("save") ne ""){
43+ if($wiki->config('page_max') ne '' && $wiki->config('page_max') > 0){
44+ if(length($content) > $wiki->config('page_max')){
45+ return $wiki->error('ページが保存可能な最大サイズを超えています。');
46+ }
47+ }
48+ if($wiki->page_exists($pagename) && $cgi->param("lastmodified") != $time){
49+ $buf .= "<p><span class=\"error\">ページは既に別のユーザによって更新されています。最新版との差分を確認して再度編集を行ってください。</span></p>";
50+
51+ my $mode = $wiki->get_edit_format();
52+ my $orig_source = undef;
53+ if($artno eq ""){
54+ $orig_source = $wiki->convert_from_fswiki($wiki->get_page($pagename), $mode);
55+ } else {
56+ $orig_source = $wiki->convert_from_fswiki(&read_by_part($wiki->get_page($pagename), $artno), $mode);
57+ }
58+ my $your_source = $content;
59+ $your_source =~ s/\r\n/\n/g;
60+ $your_source =~ s/\r/\n/g;
61+
62+ my $diff = plugin::core::Diff::_get_diff_html($wiki, $orig_source, $your_source);
63+ $buf .= $diff."<br>";
64+
65+ $content = $orig_source;
66+
67+ } else {
68+
69+#--------------------------------------------------------------------------------------------------
70+ if($content){
71+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($content)){
72+ my $time = Util::format_date(time());
73+ my $file = $wiki->config('log_dir')."/spam_page.txt";
74+ if(open(SPAM_LOG, ">>$file")){
75+ print SPAM_LOG "-" x 70 . "\n";
76+ print SPAM_LOG "$pagename:$artno ($time)\n";
77+ print SPAM_LOG "-" x 70 . "\n";
78+ print SPAM_LOG "$content\n";
79+ close(SPAM_LOG);
80+ }
81+ my $error_message = $wiki->error("編集された文章はスパム文章と判定されました。\n");
82+ $content = Util::escapeHTML($content);
83+ $content =~ s/\n/<br>/g;
84+ $error_message .= "<p>\n";
85+ $error_message .= "<div>投稿された文章：</div>\n";
86+ $error_message .= "<div>＜ページ名＞</div>\n";
87+ $error_message .= "<div>$pagename</div>\n";
88+ $error_message .= "<div>＜本文＞</div>\n";
89+ $error_message .= "<div>$content</div>\n";
90+ $error_message .= "</p>\n";
91+ return $error_message;
92+ }
93+ }
94+#--------------------------------------------------------------------------------------------------
95+
96+ #my $save_content = $content;
97+ my $mode = $wiki->get_edit_format();
98+ my $save_content = $wiki->convert_to_fswiki($content,$mode);
99+
100+ # パート編集の場合
101+ if($artno ne ""){
102+ $save_content = &make_save_source($wiki->get_page($pagename), $save_content, $artno, $wiki);
103+ }
104+ # FrontPageは削除不可
105+ if($pagename eq $wiki->config("frontpage") && $save_content eq ""){
106+ $buf = "<b>".&Util::escapeHTML($wiki->config("frontpage"))."は削除することはできません。</b>\n";
107+
108+ # それ以外の場合は処理を実行してメッセージを返却
109+ } else {
110+ $wiki->save_page($pagename, $save_content, $sage);
111+
112+ if($content ne ""){
113+ $wiki->redirect($pagename, $artno);
114+ } else {
115+ if($artno eq ""){
116+ $wiki->set_title($pagename."を削除しました");
117+ return Util::escapeHTML($pagename)."を削除しました。";
118+ } else {
119+ $wiki->set_title($pagename."のパートを削除しました");
120+ return Util::escapeHTML($pagename)."のパートを削除しました。";
121+ }
122+ }
123+ }
124+ }
125+ #--------------------------------------------------------------------------
126+ # 差分確認処理
127+ } elsif($cgi->param("diff") ne ""){
128+ if($wiki->config('page_max') ne '' && $wiki->config('page_max') > 0){
129+ if(length($content) > $wiki->config('page_max')){
130+ return $wiki->error('ページが保存可能な最大サイズを超えています。');
131+ }
132+ }
133+ $time = $cgi->param("lastmodified");
134+
135+ my $mode = $wiki->get_edit_format();
136+ my $orig_source = undef;
137+ if($artno eq ""){
138+ $orig_source = $wiki->convert_from_fswiki($wiki->get_page($pagename), $mode);
139+ } else {
140+ $orig_source = $wiki->convert_from_fswiki(&read_by_part($wiki->get_page($pagename), $artno), $mode);
141+ }
142+ my $your_source = $content;
143+ $your_source =~ s/\r\n/\n/g;
144+ $your_source =~ s/\r/\n/g;
145+
146+ if($orig_source eq $your_source){
147+ $buf .= '<p class="error">差分はありません。</p>';
148+ } else {
149+ my $diff = plugin::core::Diff::_get_diff_html($wiki, $your_source, $orig_source);
150+ $buf .= $diff."<br>";
151+ }
152+
153+ #--------------------------------------------------------------------------
154+ # プレビュー処理
155+ } elsif($cgi->param("preview") ne ""){
156+ if($wiki->config('page_max') ne '' && $wiki->config('page_max') > 0){
157+ if(length($content) > $wiki->config('page_max')){
158+ return $wiki->error('ページが保存可能な最大サイズを超えています。');
159+ }
160+ }
161+ $time = $cgi->param("lastmodified");
162+ $buf = "以下のプレビューを確認してよろしければ「保存」ボタンを押してください。<br>";
163+ if($content eq ""){
164+ if($pagename eq $wiki->config("frontpage") && $artno eq ""){
165+ $buf = $buf."<b>（".&Util::escapeHTML($wiki->config("frontpage"))."は削除することはできません。）</b>";
166+ } else {
167+ if($artno eq ""){
168+ $buf = $buf."<b>（ページ内容は空です。更新するとこのページは削除されます。）</b>";
169+ } else {
170+ $buf = $buf."<b>（ページ内容は空です。更新するとこのパートは削除されます。）</b>";
171+ }
172+ }
173+ }
174+ $content = $wiki->convert_to_fswiki($content,$format);
175+ $buf = $buf."<br>".$wiki->process_wiki($content);
176+
177+ } elsif($wiki->page_exists($pagename)) {
178+ #ページが存在する場合
179+ if($artno eq ""){
180+ $content = $wiki->get_page($pagename);
181+ } else {
182+ $content = &read_by_part($wiki->get_page($pagename), $artno);
183+ }
184+ } elsif($template ne ""){
185+ #テンプレートを指定された場合
186+ $content = $wiki->get_page($template);
187+ }
188+
189+ #--------------------------------------------------------------------------
190+ # 入力フォーム
191+ $wiki->set_title($pagename."の編集",1);
192+
193+ my $tmpl = HTML::Template->new(filename=>$wiki->config('tmpl_dir')."/editform.tmpl",
194+ die_on_bad_params => 0);
195+
196+ $tmpl->param({SCRIPT_NAME => $wiki->create_url(),
197+ PAGE_NAME => $pagename,
198+ CONTENT => $wiki->convert_from_fswiki($content, $format),
199+ LAST_MODIFIED => $time,
200+ ACTION => 'EDIT',
201+ EXISTS_PAGE => $wiki->page_exists($pagename),
202+ SAGE => $sage});
203+
204+ if($artno ne ""){
205+ $tmpl->param(OPTIONAL_PARAMS=>[{NAME=>'artno', VALUE=>$artno}]);
206+ }
207+
208+ $buf .= $tmpl->output();
209+
210+ # プラグインを挿入
211+ $buf .= $wiki->get_editform_plugin();
212+
213+ return $buf;
214+}
215+
216+1;
--- /dev/null
+++ b/kgsoft/_ex_spam_filter_light/tags/_ex_spam_filter_light#20171207/_ex_spam_filter_light/pcomment.pm
@@ -0,0 +1,99 @@
1+##########################################################################################
2+#
3+# スパムフィルタープラグイン（学習機能無し版）
4+#（pcommentプラグインのオーバーライド）
5+#
6+##########################################################################################
7+use strict;
8+
9+use plugin::pcomment::PComment;
10+
11+# plugin::pcomment::PCommentのdo_actionメソッドの置き換え
12+package plugin::pcomment::PComment;
13+
14+sub do_action {
15+ my $self = shift;
16+ my $wiki = shift;
17+ my $cgi = $wiki->get_CGI;
18+
19+ my $name = $cgi->param("name");
20+ my $message = $cgi->param("message");
21+ my $save_page = $cgi->param("save_page");
22+ my $show_page = $cgi->param("show_page");
23+ my $head_char = $cgi->param("head_char");
24+ my $reply = $cgi->param("reply");
25+
26+#--------------------------------------------------------------------------------------------------
27+ if($message){
28+ unless(&plugin::_ex_spam_filter_light::Install::judgment_text($message)){
29+ my $time = Util::format_date(time());
30+ my $file = $wiki->config('log_dir')."/spam_pcomment.txt";
31+ if(open(SPAM_LOG, ">>$file")){
32+ print SPAM_LOG "$show_page:$message - $name($time)\n";
33+ close(SPAM_LOG);
34+ }
35+ my $error_message = $wiki->error("投稿された文章はスパムメッセージと判定されました。\n");
36+ $error_message .= "<p>\n";
37+ $error_message .= "<div>投稿された文章：</div>\n";
38+ $error_message .= "<div>" . Util::escapeHTML("$message") . "</div>\n";
39+ $error_message .= "</p>\n";
40+ return $error_message;
41+ }
42+ }
43+#--------------------------------------------------------------------------------------------------
44+
45+ if($name eq ""){
46+ $name = "名無しさん";
47+ } else {
48+ # post_nameというキーでクッキーをセットする
49+ my $cookie = $cgi->cookie(-name=>'post_name',-value=>$name,-expires=>'+1M');
50+ print "Set-Cookie: ",$cookie->as_string,"\n";
51+ }
52+
53+ if($save_page ne "" && $message ne ""){
54+ my $content;
55+ if($wiki->page_exists($save_page)){
56+ $content = $wiki->get_page($save_page);
57+ $content =~ s/\n+$//g; #行末の改行は全て除去
58+ }else{
59+ $content = "[[$show_page]]\n";
60+ }
61+ my $new_content .= $head_char . "$message - $name (".Util::format_date(time()) . ")";
62+
63+ unless($reply){
64+ $content .= "\n" if($content);
65+ $content .= $new_content . "\n";
66+ }else{
67+ my @content;
68+ my $reply_sw = 0; #汚いけど...
69+ my $lev = 0;
70+ foreach(split /\n/, $content){
71+ /^([*+]+)/;
72+ if($reply_sw == 1 and $lev >= length($1)){
73+ push(@content, $head_char x $lev . $new_content);
74+ $reply_sw = 2;
75+ }
76+ if($reply_sw == 0 and $reply eq Util::md5($_)){
77+ $lev = length($1);
78+ $reply_sw = 1;
79+ }
80+ push(@content, $_);
81+ }
82+ if($reply_sw == 1){
83+ push(@content, $head_char x $lev . $new_content);
84+ }
85+ $content = join("\n", @content);
86+ }
87+
88+ $wiki->save_page($save_page, $content);
89+
90+ my $modtime = &Util::load_config_hash($wiki,$Wiki::DefaultStorage::MODTIME_FILE);
91+ $modtime->{$show_page} = time();
92+ &Util::save_config_hash($wiki,$Wiki::DefaultStorage::MODTIME_FILE,$modtime);
93+
94+ }
95+ # 表示されていたページにリダイレクト
96+ $wiki->redirect($show_page);
97+}
98+
99+1;
Show on old repository browser