正規表現道場@2ch Part4
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
05/01/17 11:51:25ID:SH1ygN1Pこのスレは有用そうな正規表現を紹介したり、
どう表現したらいいかわからないときに質問をしたりするためのスレッドです。
質問するときは使用言語や得たい結果をなるべく詳しく書きましょう。
註：& や " を書くときには、& " と描いておきましょうね。
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/
正規表現道場@2ch Part3 s/煽り|荒らし/あぼーん/g
http://pc5.2ch.net/test/read.cgi/php/1069245758/
0002nobodyさん
05/01/17 13:15:29ID:???0003nobodyさん
05/01/17 21:55:47ID:???0004nobodyさん
05/01/17 22:04:02ID:???屁
0005nobodyさん
05/01/17 22:30:18ID:???$msg = "組織運営図";
if ( $msg =~ /(.*)運営(.*)/ ){
print "ok. $1$3\n";
} else {
print "NG\n";
}
上のコードで okに行って欲しいんですが、
マッチしてくれません…。
何か根本的な勘違いしてますでしょうか。
0006nobodyさん
05/01/17 22:49:27ID:???文字コードは Shift_JIS だよね？あと $1$3 じゃなくて $1$2 だよね？
Perl 5.8 を使ってるなら、最初で use encoding 'Shift_JIS'; としてみる。
それ以前のバージョンの Perl ならとりあえず /(.*)\Q運営\E(.*)/ としてみる。
0007nobodyさん
05/01/17 23:11:27ID:???00085
05/01/18 09:38:37ID:???use encoding 'Shift_JIS';
これでいけました。
こんな単純なことだったとは…
これで昨日一日つぶしちゃった…orz
激しく感謝ですｗ
0009nobodyさん
05/01/18 16:31:30ID:???ヘルプには
・メタ文字 \Gは使用できません。
・'/'はエスケープする必要はありません。
修飾子は以下の3つをサポートしています。
k 文字を日本語(シフトJIS)として扱いします。
m 文字列を複数行として扱います。
i 大文字と小文字を区別しないで検索します。
と、あります。
--------この下が一行目-------
スレッド名
Thu, 29 Jan 2004 17:27:16 GMT
1002
0
http://hoge.com/bbsname
3
0
0
1075476984
0
-----ここまで--------
の2chブラウザのidxファイルを置き換えて
３行目の一文字目("1002"の"1")が1で、
３行目が４桁である時に
７行目を"3"にしたいのですが
speeeeedの検索文字列と置き換え文字列の欄には何を入れれば良いのでしょうか？
よろしくお願いします。
0010nobodyさん
05/01/18 17:37:11ID:TA2apQcG「・・・で・・・である時に」なんていう条件分岐の機能は持ってないだろ。
0011nobodyさん
05/01/18 19:28:22ID:???修飾子 m をセットして、検索文字列、置換文字列をそれぞれこんな感じかな。
\A(.*\n.*\n)(1\d\d\d\r\n)(.*\n.*\n.*\n)(.*\n)
$1$2$3\r\n
0012nobodyさん
05/01/19 03:18:24ID:hI5VxZ7oどんな風に記述すればよいでしょうか？
001412
05/01/19 03:40:05ID:hI5VxZ7o変数がある文字を含んでいたら、という判断をさせたいのです
0015nobodyさん
05/01/19 03:41:19ID:???0016nobodyさん
05/01/19 04:29:16ID:???if (/ある文字列/)
0021nobodyさん
05/01/19 16:04:47ID:???正規表現を独自拡張してない実装ってどれのこと？
0023nobodyさん
05/01/19 16:48:15ID:???条件付パターンマッチと言っても、変遷で表現できるので、正規表現で解が求まる
ペールはたまたま、読みやすさかなんかのために、独自の表記方法を導入してるが、
処理としては普通。実装とは関係ない。abcはabならcにマッチする、というのと変わらん
0025nobodyさん
05/01/19 17:23:49ID:???どいたしまして。
Speeeeed は初めて知ったので自信無かったけどうまくいったみたいでよかった。
なんだか話題が変な方向に行ってるみたいだけど、
>>12=14 が実装言語に何を使っているか限定せずに質問を始めたのがまずい気がする。
質問するひとは、はじめに何使ってるかをちゃんと示しておくべきだと思う。
0026nobodyさん
05/01/19 17:30:52ID:???0027nobodyさん
05/01/19 18:42:24ID:???0028nobodyさん
05/01/20 02:59:30ID:???0029nobodyさん
05/01/20 20:17:30ID:???下記だとどうやら全角英数にもマッチしてしまうみたいです。
preg_match('/[\xB0\xA1-\xF4\xA4]/', $str)
どのようにしたら漢字だけにマッチするようになるでしょうか？
0030nobodyさん
05/01/21 11:13:19ID:ALcAsVlrを
1005hw9fCDDLlBeZ0
にしたい（ようは、%以降の文字列を削りたい。%は１回しかでてこない）
にはどうすればいいでしょか？
なお、php4です。
$srt_o = preg_replace("/^(.*)(\%.*)(.*)$/i", "$1$3", $srt_o);
でもうまくいかず・・・
003130
05/01/21 11:22:49ID:ALcAsVlr変換されずでしたわ・・・
$srt_o = preg_replace("/^(.*)(\%.*)$/i", "$1", $srt_o);
003230
05/01/21 11:25:14ID:???、最後に出てきる%の文字列以降を削除する方法を教えてくださいませ
0033nobodyさん
05/01/21 11:25:24ID:???$str = '1005hw9fCDDLlBeZ0%253D';
$str = explode('%',$str,1);
var_dump($str);
で。正規表現(ﾟ⊿ﾟ)ｲﾗﾈなときは出来るだけ使わない。
0034nobodyさん
05/01/21 11:27:07ID:???とりあえずpreg_replace('/%.*/', '', $str_o);
0035nobodyさん
05/01/21 11:29:12ID:???preg_replace('/%[^%]*$/', '', $str);
%はエスケープ不要よ。
003633
05/01/21 11:30:24ID:???訂正
$str = '1005hw9fCDDLlBeZ0%253D';
$str = explode('%',$str,2);
var_dump($str);
0037nobodyさん
05/01/22 16:28:46ID:Z5CU+gTj2
00:02:19,916 --> 00:02:21,084
I can't move!
3
00:02:24,879 --> 00:02:27,215
Help me! I can't move!
4
00:02:27,882 --> 00:02:28,591
Oh my god!
このような文字列のtxtファイルを英語の部分のみ下のように取り出したいのですが
I can't move!
Help me! I can't move!
Oh my god!
いいソフトはありますかと聞いたところ正規表現ならできると聞き、このスレに来ました。
上の条件を満たすにはどのようにすればいいのでしょうか？
0038nobodyさん
05/01/22 16:48:23ID:???「ソフトありますか」からここに来るのがいまいちよくわからんな。
正規表現の書き方が知りたいのか？
できるけど正規表現が使えるソフトかなんらかのスクリプトなどが
ないと意味ないぞ。
0039nobodyさん
05/01/22 17:04:14ID:Z5CU+gTj正規表現が使えるソフトは自分でみつけました。
あとはそこに%$？みたいな記号を入れるのですが、それがわからないのです。
0040nobodyさん
05/01/22 17:06:17ID:???grepでいいでしょ。
明らかに板違いだね。
ココから来たのかよ。
気軽に「こんなソフトありませんか？」 6
http://pc5.2ch.net/test/read.cgi/software/1104587671/695
とりあえず、放置推奨 >all
0043nobodyさん
05/01/25 07:32:45ID:???$strが漢字一文字の時マッチ。
preg_match("/^[\xb0-\xff][\xa0-\xff]$/", $str)
意図が今ひとつ分からないから、こんなもんで。
0044nobodyさん
05/01/26 10:23:23ID:???逆に囲まれているというのは出来るのですが囲まれていない方が分からないです。。。
0045nobodyさん
05/01/26 10:27:00ID:???0046nobodyさん
05/01/26 13:29:10ID:???囲まれているのができるのならば、
(1) 囲まれている<と>を適当にぶつからない文字or文字列に変換する。
制御文字とかがオススメ。
(2) 残った全ての<と>は囲まれていないのでお前の好きなように変換する
(3) (1)で変換したものを元の<と>に戻す
とすればいいはずだな。
0047nobodyさん
05/01/26 13:30:28ID:???Perl でいい？ちょっと苦しい感じもするけどこんなのとかどうでしょう？
$str =~ s/(?:(「.*?」)|(\<))/$1||"<"/ge;
$str =~ s/(?:(「.*?」)|(\>))/$1||">"/ge;
004847
05/01/26 13:33:15ID:???置換後のダブルクォーテーションの中は「＆ｌｔ；」「＆ｇｔ；」です。
$str =~ s/(?:(「.*?」)|(\<))/$1||"＆ｌｔ；"/ge;
$str =~ s/(?:(「.*?」)|(\>))/$1||"＆ｇｔ；"/ge;
0051nobodyさん
05/01/27 01:51:00ID:???変換する正規表現を書いてみました。
$sql =~ s/(\'|\\|\%)/\\$1/g;
正常に動作しているみたいなのですが、異常系のパターン
文字列等ございましたらご指摘いただきたい次第です。
宜しくお願いします。
0052nobodyさん
05/01/27 14:08:43ID:???それで特に問題ないように思うけど、
そもそもな話で、SQL のエスケープの仕様ってそれで良いの？っていうのと、
DB のライブラリにはエスケープする関数が用意されてることが多いので
そっちを調べた方が良い気がする。
0053nobodyさん
05/01/28 02:31:31ID:???ご返答有難うございます。
おそらくこの3つをエスケープすれば良いかと思うのですが、
他にもあるのでしょうかね、、
スレ違いっぽいので他のところで聞いてみます。
0054nobodyさん
05/01/28 12:52:16ID:???%a = $a =~ /([a-z])(\d)/g;
とすると
$a{a} == 1;
のようになりますが、括弧が４つの時に$2と$4だけを毎回ハッシュに渡すには
どうすればいいんですか？
%a = $a =~/(([a-z])\d)([a-z](\d))/g;
$2と$4だけを毎回%aに渡したいのです。
0055nobodyさん
05/01/28 13:08:00ID:???(?: ) で後方参照されなくなるので、こうするとか。
%a = $a =~/(?:([a-z])\d)(?:[a-z](\d))/g;
005754
05/01/28 13:50:40ID:???$html_1 = qq|<input type="hidden" name="test1" value="a">|;
$html_2 = qq|<input type="hidden" value="a" name="test1">|;
%hiddenというのの中にnameの値をキーにvalueの値を値にしたハッシュを作成したいです。
わからないのは
my %hidden = $html_1 =~ m{<input type="hidden"\s*(?:name="(.*?)")?\s*(?:value="(.*?)")?.*?>};
$html_1に対してはこれでいいですが$html_2に対してはこれではキーがありません；
nameとvalueの順番がなんでもいいようにするにはどうすればいいですか？
0058nobodyさん
05/01/28 18:09:31ID:???一発でマッチする方法はあるかなあ？俺はこんなのしか思いつかなかった。
my $params = ($html =~ m{<input\s+type="hidden"([^>]+)>})[0];
my %hidden = $params =~ m{(?:\s+(\w+)="([^"]+)")}g;
0059nobodyさん
05/01/28 22:09:22ID:???素直に 2 回マッチさせるのが無難じゃないかなぁ，こんな感じで。
my %hidden = map {/\bname="(.*?)"/, /\bvalue="(.*?)"/} $html_2, ;
0060nobodyさん
05/01/30 11:46:21ID:???my %hidden = $html_2 =~ /<input type="hidden".*?(?=.*?\bname="(.*?)").*?\bvalue="(.*?)".*?>/;
0061nobodyさん
05/01/30 16:30:48ID:???それいいなｗ
%hidden =
$html =~
/<input(?=.*?\btype="hidden")(?=.*?\bname="(.*?)")(?=.*?\bvalue="(.*?)").*?>/g;
こうすると type=hidden が後ろになっても取れるのかー。戴きます。
0062nobodyさん
05/01/30 19:07:48ID:60wlVefXtest.txtというファイルに
|aaaaaaaaaa|ddddddddddddd|ggggggggggggg|
|ffffffffff|hhhhhhhhhhhhh|jjjjjjjjjjjjj|
|mmmmmmmmmm|uuuuuuuuuuuuu|lllllllllllll|
というのが書かれているとします。
このファイルをUNIX上でcat test.txt | perl test.cgi
というコマンドを打ちます。
test.cgiの処理として
'<>'で標準入力からtest.txtの内容を読み込んで、
'|'を区切り文字としてテーブルタグに変換させる
正規表現を書ける人いませんか？
<table>
<tr><td>aaaaaaaaaa<td></td>ddddddddddddd<td></td>ggggggggggggg</td></tr>
<tr><td>ffffffffff<td></td>hhhhhhhhhhhhh<td></td>jjjjjjjjjjjjj<td></td>
<tr><td>mmmmmmmmmm<td></td>uuuuuuuuuuuuu<td></td>lllllllllllll<td></td>
</table>
というふうに変換したいのですが、うまく正規表現が書けません
0063nobodyさん
05/01/30 19:10:42ID:60wlVefX<table>
<tr><td>aaaaaaaaaa<td></td>ddddddddddddd<td></td>ggggggggggggg</td></tr>
<tr><td>ffffffffff<td></td>hhhhhhhhhhhhh<td></td>jjjjjjjjjjjjj</td></tr>
<tr><td>mmmmmmmmmm<td></td>uuuuuuuuuuuuu<td></td>lllllllllllll</td></tr>
</table>
↑のように変換したいのですが
0064nobodyさん
05/01/30 19:14:46ID:???ま、いくらでもいます。
0065nobodyさん
05/01/30 19:17:56ID:60wlVefXどのような正規表現で処理したら良いのか教えてください。
0066nobodyさん
05/01/30 20:23:18ID:???行頭の|を<tr><td>に置き換え。s/^\|/<tr><td>/;
行末の|を</td></tr>に置き換え。s/\|$/<\/td><\/tr>/;
その他の|を</td><td>に置き換え。s/\|/<\/td><td>/g;
<table></table>は適当に付ける。
0067nobodyさん
05/01/30 21:16:39ID:???\Q～～\E
はどういう意味ですか？
0069nobodyさん
05/01/30 21:44:03ID:???0071nobodyさん
05/01/31 01:31:35ID:???0072nobodyさん
05/01/31 07:14:59ID:???0074nobodyさん
05/01/31 13:13:56ID:???0075nobodyさん
05/02/02 10:56:57ID:hb9v8KSn若気の至りで、アクセス解析を読み込むためのJSファイルをHTML文書の頭に付けてたのですが、
思い直して</body>直前に入れなおしたいと思ったのですが、
speeeeed!（k,m,iオプション有）で、置換する際に、
<body><script type="text/javascript" src="foo.js"></script>
本文
</body>
・bodyとscriptの間に改行はない
・bodyにidが振られている場合もある
で、
<body(.*?)>(<script.*?script>)(.*?)</body>
↓
<body$1>$3$2</body>
とやってみたのですが、うまくいきませんでした。
ためしに、
<script.*?script>だけでマッチングを試してみたのですが、
<script type="text/javascript" src="foo.js"></script>にマッチしませんでした。
どう書き直したらよいのでしょうか？
全く根本的に間違ってるような予感がしますが、お教え下さいますよう宜しくお願いいたします。
0076nobodyさん
05/02/02 12:18:04ID:???<body(.*)>(<script.*script>\r\n)((.*\r\n)*)</body>
<body$1>\r\n$3$2</body>
0077nobodyさん
05/02/02 15:04:00ID:???でも"¥"などの実体参照化されてる部分の"&"は変換しません。
で自分なりに考えたのですが↓
$text="<p>キュウリ&ナス＝¥200</p>";
$text=~s/&[^(yen;|euro;|amp;|copy)]/&/g;
print "$text¥n";
を実行すると、結果が
<p>キュウリ&ス＝¥200</p>
となり、うまくいきません。
2行目の正規表現がおかしいと思うのですが、どう変えたらいいのでしょうか？
よろしくお願いします。
0078nobodyさん
05/02/02 15:10:51ID:???007977
05/02/02 15:12:58ID:???ｐｅｒｌで文中の"＆"を"＆ａｍｐ;"に変換したいと思ってます。
でも"＆ｙｅｎ;"などの実体参照化されてる部分の"＆"は変換しません。
で自分なりに考えたのですが↓
$ｔｅｘｔ="<ｐ>キュウリ＆ナス＝＆ｙｅｎ;２００</ｐ>";
$ｔｅｘｔ=~ｓ/＆[^(ｙｅｎ;|ｅｕｒｏ;|ａｍｐ;|ｃｏｐｙ)]/＆ａｍｐ;/ｇ;
ｐｒｉｎｔ "$ｔｅｘｔ¥ｎ";
を実行すると、結果が
<ｐ>キュウリ＆ａｍｐ;ス＝＆ｙｅｎ;２００</ｐ>
となり、うまくいきません。
２行目の正規表現がおかしいと思うのですが、どう変えたらいいのでしょうか？
よろしくお願いします。
0080nobodyさん
05/02/02 15:33:41ID:???これでどう？
$text =~ s/(?:(&(?:yen|euro|amp|copy);)|&)/$1?$1:"&"/ge;
0081nobodyさん
05/02/02 15:37:52ID:???0083nobodyさん
05/02/02 15:41:22ID:???0085nobodyさん
05/02/02 15:50:43ID:???0086nobodyさん
05/02/02 19:20:05ID:???ダメだとか言う前に自分のコード見せてみなm9(^Д^)ﾌﾟｷﾞｬー
0087nobodyさん
05/02/02 19:25:17ID:???0089nobodyさん
05/02/02 23:52:44ID:???HTML4 で使える文字実体参照
http://www.ne.jp/asahi/minazuki/bakera/html/reference/charref
0090nobodyさん
05/02/02 23:56:25ID:???0091nobodyさん
05/02/03 04:21:06ID:???0094nobodyさん
05/02/03 06:43:00ID:???0096nobodyさん
05/02/03 09:12:37ID:???0097nobodyさん
05/02/03 13:43:04ID:???yen => 1,
euro => 1,
amp => 1,
copy => 1,
# 気が済むまで並べる
);
$text =~ s/(?:(&(\w+);)|&)/$1&&$entref{$2}?$1:"&"/ge;
0098nobodyさん
05/02/03 20:21:27ID:???0099nobodyさん
05/02/03 20:27:30ID:???0101nobodyさん
05/02/03 22:25:28ID:???■ このスレッドは過去ログ倉庫に格納されています