[過去ログ] □規制解除要望□yournet.ne.jp専用3 (996レス)
上下前次1-新
抽出解除 レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
368(3): ◆qb.x27/m96 04/03/19 12:39 ID:Hc9BbOiR(2/2)調 AAS
>>363
サンプル正規表現です。
長すぎるので改行して分けてありますので、一行に直して入れてみて下さい。
----
(((3[2-9]|4[0-7]).44.61)|((16[0-9]|17[0-5]).203.61)|((22[4-9]|23[0-9]).109.219)|((([0-9])|([1-9][0-9])|(1([0-1][0-9]))|(12[0-7])).215.220)|
((([0-9])|([1-9][0-9])|(1([0-1][0-9]))|(12[0-7])).112.219)|(((6[4-9])|([7-9][0-9])|(1[0-1][0-9])|(12[0-7])).113.221)).ap.yournet.ne.jp
372: GlobalService ★ 04/03/19 12:47 ID:??? AAS
>368
それでやってみる
378(1): GlobalService ★ 04/03/19 13:08 ID:??? AAS
perl版(2)
open FILE , "sec2chd/dat/1078896536.dat";
open FILE2 , ">dn.lst.ini";
foreach (<FILE>) {
s/\r//g;
s/\n//g;
@sp = split /\<\>/, $_;
next if ($_ eq "");
next if ($sp[0] eq "");
next if ($sp[0] !~ /yournet.ne.jp/);
$ok = "NO";
#$ok = "OK" if ($sp[5] =~ /([3-4][0-9].44.61)|([1][6-7][0-9].203.61)|([2][2-3][0-9].109.219)|(215.220)|(112.219)|(113.221).ap.yournet.ne.jp/);
$ok = "OK" if ($sp[0] =~ /(((3[2-9]|4[0-7]).44.61)|((16[0-9]|17[0-5]).203.61)|((22[4-9]|23[0-9]).109.219)|((([0-9])|([1-9][0-9])|(1([0-1][0-9]))|(12[0-7])).215.220)|
((([0-9])|([1-9][0-9])|(1([0-1][0-9]))|(12[0-7])).112.219)|(((6[4-9])|([7-9][0-9])|(1[0-1][0-9])|(12[0-7])).113.221)).ap.yournet.ne.jp/);
print $ok." ".$sp[0]."\n";
print FILE2 $ok." ".$_."\n";
}
close FILE2;
close FILE;
東京でも入ってない所があるようだ >368
383: ◆qb.x27/m96 04/03/19 13:53 ID:K+wdZ+UX(1)調 AAS
>>378
>>368は過去の規制のときに作ったもので
>>363を試す時にサンプルとして入れてみる為のものです。
今回の規制の絞り込み用ではないですよ。
検索対象となる文字列のソースはこのスレを
全文コピペして貼り付けてやれば
書かれた正規表現に該当するホストがずらずらと列挙されます。
要するに絞込みの正規表現を考える時に
役に立つツールのようなものです、、
#仕事の為落ち
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.021s