[過去ﾛｸﾞ] 重複スレ削除 綺麗(ver 0.1) [無断転載禁止]©2ch.net (1002ﾚｽ)
上下前次1-新

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

856(1): 動け動けウゴウゴ２ちゃんねる 2015/12/15(火)20:09 ID:8y9kkQCZ(3/11) AAS
sub isUmetate(){
my ($resNo,$line) = @_;
if($resNo < 20) {return 0;}
if(!$line) {return 0;}
my ($name,$mail,$hizke,$honb,$sub) = split(/<>/,$line);

if($honb =~ /Rock/i) {return 1;}
my $dan = &HowManyDan($honb);
if($dan > 13) {return 1;}

my $IMAstr = $honb;
$IMAstr =~ s/\d+//g;
$IMAstr =~ s/\x83[\x40-\x96]//g;# カタカナ
$IMAstr =~ s/<\/?.*>//g ;
$IMAstr =~ s/\n//g;
$IMAstr =~ s/ //g;
$IMAstr =~ s/　//g;
$IMAstr =~ s/<br>//g;

my $IMAlen = length($IMAstr);
if(&samePost($MAEstr,$MAElen,$IMAstr,$IMAlen))
{
$MAEstr = $IMAstr;
$MAElen = $IMAlen;
return 1;
}
$MAEstr = $IMAstr;
$MAElen = $IMAlen;

return 0;
}

---

上下前次1-新書関写板覧索設栞歴

---

あと 146 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.006s