正規表現道場@2ch Part3 s/煽り|荒らし/あぼーん/g
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
03/11/19 21:42ID:Kst3Nn4Sこのスレは有用そうな正規表現を紹介したり、どう表現したらいいかわからないときに質問をしたりするためのスレッドです。
質問するときは使用言語や得たい結果をなるべく詳しく書きましょう。
註：& や " を書くときには、& " と描いておきましょうね。
Perlメモ
http://www.din.or.jp/~ohzaki/perl.htm
正規表現メモ
http://www.kt.rim.or.jp/~kbk/regex/regex.html
Regex::Diagram.pm
http://www.cc.rim.or.jp/~midorin/mad-p/RegexDiagram.html
正規表現
http://www.cc.rim.or.jp/~midorin/mad-p/perl/benkyou/PRC2kRegex/
UNIX正規表現入門 目次
http://www01.u-page.so-net.ne.jp/jc4/hiroyuki/rex_index.html
Regular Expression(Riue ちゃんの正規表現講座) - Index
http://www.sixnine.net/regexp/
ほとんどは↓のリンク集にまとまっています。
正規表現最新リンク集2002
http://www2.famille.ne.jp/~akio1998/l_grep.html
過去スレ
正規表現道場@2ch
http://pc.2ch.net/test/read.cgi/php/996105815/
正規表現道場@2ch Part2
http://pc2.2ch.net/test/read.cgi/php/1038146241/
0074nobodyさん
03/12/15 14:41ID:???0075nobodyさん
03/12/15 23:09ID:8LAW+/sT70は間違ってはいないよ、不充分かも知れんが。
そもそも65の質問がどういうシチュエーションでどういう動作の目的でどういうマ
ッチングをさせたいのかを詳細に述べていないという不充分な訊き方なので、70のよ
うな「充分用を足すかどうかは保証の限りではない」当たり障りのない答えが返って
きても当然だと思うが。
70の記述で取り敢えず「@」「word」が含まれていれば、その含まれている最初
の箇所マッチする。 複数含まれていて、それを全てマッチさせるのか、n回目まで
マッチさせるのかなどでオプション等の補助的記述が必要になって来るし、「含まれ
ている」ではなく「その単語そのもの独立だけに厳密マッチ」させるのならが、また
違う話になってくる、それをイチイチ説明していたら解説書になってしまう、それは
自分で読んでくれってことになる。
0076nobodyさん
03/12/16 09:10ID:???0078nobodyさん
03/12/16 16:12ID:???0080nobodyさん
03/12/18 18:53ID:zzUoxnBBX25.125
X12.1
X78.
でなく
X25
X789
にマッチさせたいんです。
御多忙中の所、誠に恐縮では御座いますが、
御教示いただければ幸いです。
0083nobodyさん
03/12/18 19:11ID:zzUoxnBBXは無視してもらっていいです。
0084nobodyさん
03/12/18 19:27ID:???$hoge = "a(b(c))";
の時に、$hoge =~ m/(.*)\((.*)\)/
とすると、$1は"a(b"で、$2は"c)"になりました。
つまり文末から見ていることになるのですが、これを
$1は"a"で、$2は"b(c)"になるようにするにはどうすればいいでしょうか。
よろしくお願いします。
0085nobodyさん
03/12/18 19:36ID:???それは文末から見ているんじゃない。. は ( も含むから
最初の .* が一番長くマッチできるところまで取り込んでいるだけ。
/([^)]*)\((.*)\)/ か /(.*?)\((.*)\)/ かこの辺↓参照。
http://www.din.or.jp/~ohzaki/regex.htm#GetNestedParen
0087nobodyさん
03/12/18 20:34ID:???0088nobodyさん
03/12/18 21:08ID:zzUoxnBB例えば
10.
10.01
10
のうち、全ての"10"を拾います。 上記３つの数値のうち小数点を含まない
10（３つ目）のみにマッチさせたいんです。
0091nobodyさん
03/12/19 06:15ID:z9mYPuUz0092nobodyさん
03/12/19 08:15ID:tSEWBAlW小数点を含まない数値にマッチさせるパターンを教えて下さい。
X25.125
X12.1
X78.
でなく
##X25##
##X789##
にマッチさせたいんです。
御多忙中の所、誠に恐縮では御座いますが、
御教示いただければ幸いです。
009339
03/12/19 10:20ID:???自力で検索したサイトは難しい所ばかりだった気がしたのですが、
>>1のリンク先を一通りち回って、今回は何とかなりました。
たぶん答えるのもアホらしい低レベルな質問だったんでしょうね。
スレ汚し失礼しました。
0094nobodyさん
03/12/19 13:04ID:???0096nobodyさん
03/12/19 23:48ID:???0097nobodyさん
03/12/21 14:45ID:???お前さんのレベルじゃ，
込み入った正規表現に手を出すのはまだ早いんじゃないか？
とりあえずわかりやすい代替手段でも使っておけ。
my $f = 'fs4.5s5d.af56.156asd';
my @res = ();
foreach ( split(/[^\d.]/, $f) ){ push( @res, $_ ) if(/^[\d]+$/); }
if(! scalar(@res) ){ print "no match!\n"; }
elsif( scalar(@res) > 1 ){ print "too much match!\n"; }
else{ print "matched:[$res[0]]\n"; }
0098nobodyさん
03/12/21 23:40ID:qD9UdeKRnyのキー情報（↑みたいなの）を正規表現で表すことできますかね？
ダウソ板のスレを全部取り込んで、
キー情報だけ抜き出してリストを作りたいです。
0099nobodyさん
03/12/22 00:11ID:???0101nobodyさん
03/12/22 02:02ID:???0102nobodyさん
03/12/23 15:26ID:???からも
xxx.xxxx.ap.so-net.ne.jp
からもプロバイダ名を抽出させる方法を教えてください。
0103nobodyさん
03/12/23 18:11ID:???と
(\S+\.)?\S+\.[a-zA-Z]{3}
俺にはこんなものしか思いつかねーよ
0104nobodyさん
03/12/23 19:52ID:???ASAHIネットは www.ne.jp というホスト名を持っているわけだが、
ここからASAHIネットだと特定できる文字列をどうやって抽出しようかねぇ?
/
(?:
([0-9A-Za-z](?:[\-0-9A-Za-z]*[0-9A-Za-z])?) # 3rd LD
\.
)?
([0-9A-Za-z](?:[\-0-9A-Za-z]*[0-9A-Za-z])?) # 2nd LD
\.
([A-Za-z](?:[\-0-9A-Za-z]*[0-9A-Za-z])?) # TLD
\.?$
/x
0106nobodyさん
03/12/24 14:10ID:???2ch.netを取得したいと仮定して答えても問題ないかな？
0109nobodyさん
03/12/25 19:44ID:???[-0-9a-zA-Z]+.[-0-9a-zA-Z]+$
多分[-0-9a-zA-Z]じゃ足りないけどよく分からないので。識者よろ
0110nobodyさん
03/12/25 19:55ID:???0111nobodyさん
03/12/25 20:51ID:???<q cite="http://member.nifty.ne.jp/moha/rfc/rfc2396j.txt">
hostname = *( domainlabel "." ) toplabel [ "." ]
domainlabel = alphanum | alphanum *( alphanum | "-" ) alphanum
toplabel = alpha | alpha *( alphanum | "-" ) alphanum
</q>
=> >>104
0112nobodyさん
03/12/25 21:14ID:???後ろから二つ目の.まで
hogehoge.ne.XXのように.の後が2文字なら
後ろから三つ目の.まで
.XXXのXがすべて\dならIPアドレスということで全部
とでもしておけばいいんじゃない？適当すぎですが
0115nobodyさん
03/12/26 13:51ID:icJ7Wsig$_ = << "EOD" ;
<test>
<test2>abc</test2>
</test>
<test>
<test2>def</test2>
</test>
EOD
/(<test>.+<\/test>)/s ;
print "$1\n" ;
テキスト中にある<test>文字列</test>を抽出したいと思ってるんだけど、
結果はこうなってしまう。
<test>
<test2>abc</test2>
</test>
<test>
<test2>def</test2>
</test>
結果はこうなって欲しい。
<test>
<test2>abc</test2>
</test>
こんな事も試したけどうまくいかず･･･
/(<test>(?!<test).+<\/test>)/s ;
何方か、お助け。
0117nobodyさん
03/12/27 16:00ID:???のような感じのテキストで[hoge]以外の[と]で囲まれている部分を消して
〜〜[hoge]〜〜〜〜〜〜〜
のようにしたいのですが、hoge以外の場合マッチという方法が思いつきま
せん。[^hoge]で無いことは確かなんですが・・。
文字列の否定の方法をどなたか教えてくださいませ。
0118nobodyさん
03/12/27 17:39ID:???s/\[(?!hoge)[^\]]*\]//g;
http://www.din.or.jp/~ohzaki/regex.htm
0120初心者スレ902,904
03/12/29 16:56ID:???http://pc2.2ch.net/test/read.cgi/php/1069846177/902-
こちらから誘導されてきました。
再度質問を書きます
あるスクリプトで
my $check = '(?:^|[\0-\200\240-\337])(?:[\201-\237\340-\374]{2})*';
$FORM{'FROM'} =~ s/($check)(?: | )+$/$1/g;
というのがあったのですが、"?:"というのはどういう意味なんでしょうか？
（このスレでも"?:"という表現が使われていますね）
ttp://www.kt.rim.or.jp/~kbk/perl5.005/perlre.html
ここも見てみたのですが、いまいち意味が分かりませんでした。
教えてもらえると助かります。
0121初心者スレ902,904
03/12/29 17:03ID:???ttp://www.kt.rim.or.jp/~kbk/regex/regex.html#GROUPING_NOBR
ここを読んだら分かりました。
0122nobodyさん
03/12/31 18:09ID:9hwbEMBW/#{str1}/.match(str2)
としたときstr1のメタ文字を通常の文字としてマッチさせたいのですがどうしたらいいですか？
0125nobodyさん
04/01/07 22:03ID:3+H2s8ZL<dt>クソスレみっけ<><>03/12/30 00:57 ID:o9NEl4Ao<dd>じしんないから3で <br>
とあって、空タグの<>間にある文字列を
<dt><a href="mailto:sage">[名無し]さん(bin+cue).rar</a> 03/12/30 00:57 ID:St9M3KSl<dd>2 <br>
<dt><a href="mailto:">クソスレみっけ</a> 03/12/30 00:57 ID:o9NEl4Ao<dd>じしんないから3で <br>
のように<a>に内包させたい場合どうしたらよいでしょうか
テキストエディタは秀丸を使っています
0126nobodyさん
04/01/07 22:21ID:???置換ダイアログで
検索: <dt>\f[^<]*\f<>\f[^<]*\f<>
置換: \0<a href="mailto:\3">\1</a>
0128nobodyさん
04/01/08 11:30ID:A5R/iNdF＜…＞となっている不等号はHTMLタグとみなして、そのままにしておき
それ以外のHTMLタグとみなせない不等号を＆ｌｔ；と＆ｇｔ；に置き換えて
HTMLタグ内にない”と＆をそれぞれ＆ｑｕｏｔ；と＆ａｍｐ；に変換するように
正規表現を書きたいのですが色々書き直して試してますが
思い通りに動作しなくて困ってます。
どのように正規表現を書けばよいか知恵を貸してください。お願いします。
＜…＞の形になってない不等号を＆ｌｔ；と＆ｇｔ；に置き換える作業は今は
以下のようになってます。
$message = @ereg_replace("＜(([^＞]|\n)*)＜", "＆ｌｔ；\\1＆ｌｔ；", $message);
$message = @ereg_replace("＜(([^＞]|\n)*)", "＆ｌｔ；\\1", $message);
$message = @ereg_replace("(([^＜]|\n)*)＞", "\\1＆ｇｔ；", $message);
正規表現のせの字もわからんような状態から何とかあちこち検索かけてここまで作りました。
しかし、まだ正規表現のありがたみが足りない気がして、不満です。
よければもっと要約できる点、あるいは不備な点の指摘をお願いします。ちなみに、書き込みのためにここでは全角でインデントいます。コピペの際にご留意下さい。
#-----------------------#
# UA一般名化 #-----------------------------------------------------#
#-----------------------#
# 引数は、($ENV{'USER_AGENT'})
sub envUa2uaName{
my ($UA) = $_[0];
if($UA =~ /MSIE/){
$UA =~ s/(.){0,}MSIE ([0-9]{1,}(\.){0,}[0-9]{0,})(.){0,}/InternetExplorer $2/;
}
elsif($UA =~ /Opera/){
$UA =~ s/(.){0,}Opera(.)([0-9]{1,}(\.){0,}[0-9]{0,})(.){0,}/Opera $3/;
}
elsif($UA =~ /Safari/){
$UA =~ s/(.){0,}Safari(.)([0-9]{1,}(\.){0,}[0-9]{0,})(.){0,}/Safari $3/;
}
elsif($UA =~ /Netscape/){
$UA =~ s/(.){0,}Netscape(.)([0-9]{1,}(\.){0,}[0-9]{0,})(.){0,}/Netscape $3/;
}
elsif($UA =~ /Firebird/){
$UA =~ s/(.){0,}Firebird/Firebird/;
}
elsif($UA =~ /^Mozilla/){
$UA =~ s/Mozilla\/([0-9]{1,}(\.){0,}[0-9]{0,})(.){0,}/Mozilla $1/;
}
$UA =~ s/([a-z A-Z 0-9]{0,})\/([0-9]{1,}(\.){0,}[0-9]{0,})/$1 $2/g;
return $UA;
}
0132nobodyさん
04/01/13 18:12ID:???0134nobodyさん
04/01/13 19:00ID:???0136nobodyさん
04/01/13 19:07ID:???0138nobodyさん
04/01/13 19:46ID:???0140未承諾広告※ ◆aiY4htt2.2
04/01/13 21:12ID:???と聞こえてくるのは幻聴でしょうか。。。
0141nobodyさん
04/01/13 22:04ID:???0142nobodyさん
04/01/14 08:50ID:???0143nobodyさん
04/01/15 16:48ID:???mb_ereg("正規表現|ない|or|しょう",$text);
//"|" は二つだけですよね？
こんな感じで、複数の文字列にヒットする方法を知りませんか？
eregでもpreg_matchでもどちらでも可能であれば教えて下さい。
0144nobodyさん
04/01/15 17:23ID:???0148nobodyさん
04/01/15 21:38ID:Z1eTG8w5アクセス制限はPerlではできないかと思いますが、
これらを正規表現にてなんとか綺麗にかけないもの
でしょうか。
もしも良い案がございましたらご教授ください。
0152nobodyさん
04/01/16 17:53ID:???あいうえお\r\n
かきくけこ\r\n
\r\n
さしすせそ\r\n
たちつてと\r\n
naninuneno\r\n
\r\n
歯皮膚へ補\r\n
\r\n
かきくけこ\r\n、naninuneno\r\n、歯皮膚へ補\r\nにマッチして欲しいんですが・・・。
0154nobodyさん
04/01/16 20:49ID:???(?:\n?)[^\r\n]+\r\n(?=\r\n)
0155未承諾広告※ ◆aiY4htt2.2
04/01/16 22:03ID:???手抜きかも。。。
0156nobodyさん
04/01/16 22:45ID:???0158nobodyさん
04/01/18 20:18ID:???「(文字列 ほげ か、文字列 ふが)が先頭にある文字列以外にマッチする」という正規表現はどのようにすれば記述できるでしょうか？
/(([^ほ][^げ])|([^ふ][^が])).*/
かと思ったのですが、違うようです……
0160nobodyさん
04/01/19 14:48ID:UUNY3/Bm$domainにドメインが入っていて、(仮にyahoo.co.jp)
$hogeに入力されたURLが入っているときに
$hogeがルートディレクトリから2つ以上掘り下げた場所にあるファイルのURLなら、ある処理をする
ということをしたいのですが、頭の中ではまとまっていてもどのようにすればいいのかが・・。
ちょっと解りにくいと思うので、具体的に$hogeが何ならokで何ならNGかを↓
○ http://yahoo.co.jp/
○ http://yahoo.co.jp/xxx
○ http://yahoo.co.jp/xxx/
○ http://yahoo.co.jp/xxx/top.html
× http://yahoo.co.jp/xxx/yyy/
× http://yahoo.co.jp/xxx/yyy/zzz/...../foo.html
・
・
こんな感じです。
ネックとしてはディレクトリの時｢/｣をつけてる場合とそうでない場合がある。
index.htmlなどを書く場合とそうでない場合がある。
というところでしょうか。
で、マッチした場合に処理するという形で考えてるんですが、
if ($hoge =~ /^https?:\/\/\Q$domain\E\/([^\/]+)\/※/) { 処理 }
※の部分にスラッシュがあるか、なくてもドットがなければマッチ
という風にすればいけるのかな？などと考えているのですが、
どのように書けばよいのかが解りません。また本当にそれで実現できるのかも｢?｣です。
わかりにくい質問だとは思いますが、教えていただけませんでしょうか。
0161nobodyさん
04/01/19 15:22ID:???厳密なこと言うと /xxx/yyy がディレクトリかファイルかは、
実際にその URL にアクセスしてみないとわからないので、
どっかで妥協しないといけないと思う。
で、 >>160 のような前提でマッチするとするなら、こんな感じかな。
$hoge =~ /^https?:\/\/$domain\/([^\/]+)\/([^\/]+\/|[^\/\.]+$)/
0162nobodyさん
04/01/19 15:33ID:???有難うございます。確かに厳密にはそうですが、まぁここではそこまで突っ込まないことにします。
で、少し書いていただいたソースでテストしてみましたが、おそらく期待通りのようです。
後でまたテストしてみます。有難うございました。
0163158
04/01/20 00:19ID:???プログラム自体が「設定ファイルに記述した正規表現(のリスト)にマッチしたら」っていう処理なんで、
>逆に、「〜にマッチしなかったら」という処理にした方が楽。
とは分かってるんですが、何とかならない物かと。
……あや、PHPでも '?!' は使えるのか。ってことは、
/^（?!ほげ）.*/
で、「文字列 ほげ が先頭にある文字列以外にマッチ」になるのか？
としても、
/^(（?!ほげ）|(?!ふが)).*/
じゃないよなぁ……。
0164nobodyさん
04/01/20 03:08ID:???0167nobodyさん
04/01/20 08:28ID:???0168nobodyさん
04/01/20 17:57ID:???長期滞在は精神衛生上よろしくありませんので、あくまでピーピングってください。
0169158
04/01/21 03:02ID:???申し訳ないです。数時間色々試して、「正規表現でそういうのは無理」
と思いつつもつい、知ってる人がいれば良いな程度に書き込んでしまいました。
(「無理」って思ったんなら諦めろよ、俺。)
処理の方いじってみる事にします。(とりあえず、当面質問スレには出向かない方向で。)
ありがとうございました。
0170nobodyさん
04/01/21 06:51ID:???気持ち悪いです。
0171nobodyさん
04/01/21 07:45ID:???■ このスレッドは過去ログ倉庫に格納されています