正規表現道場@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/
0628nobodyさん
04/08/16 10:56ID:???という文字列があって１つ目の＠を(1)、２つ目の＠を(2)という風に
置換したいのですが、どのように記述すれば良いのか教えてもらえますと助かります。
0629628
04/08/16 11:10ID:???解決しました。お騒がせしてすみません。
0630nobodyさん
04/08/16 15:12ID:???まじかよ！？
正規表現でも実現しようぜ。
for (0..100){
unless ( $value =~ s/＠/$_/ ) { last }
}
perlならこれで動くか？なんか怖いからテストしたくないなｗ
0631nobodyさん
04/08/16 15:16ID:???＜ルール＞
１．言語特有のモジュールを使わずに実現しる。
２．処理前に配列の中に全角数字、半角数字を準備するのは禁止
おまいらこんなはちゃめちゃなルールでできるか？上司が意味不明なこと言ってきたんだよorz
0632nobodyさん
04/08/16 15:34ID:???perl ならこんな感じか。
$i = 0;
$s =~ s/＠/"(" . ++$i . ")"/eg;
print $s;
0633nobodyさん
04/08/16 15:55ID:???my $str = '１２３４５６７８９０';# EUC
$str =~ s/(?:\xA3([\xB0-\xB9]))/ chr(ord($1)-0xB0+ord('0')) /eg;
print "$str\n";
他の種類の全角文字も入る可能性があるなら、
http://www.din.or.jp/~ohzaki/perl.htm#JP_Match
を参考にするといい。
0636633
04/08/16 19:56ID:???直前までPerlのスレ見てたんで思わずPerlで書いてもた・・・
0637nobodyさん
04/08/16 21:39ID:???10個書き並べればOKじゃないかという気もする
0638nobodyさん
04/08/16 21:48ID:???>>633
0xA3B0〜0xA3B9までが０〜９なんだよ。
第1バイトが0xA3なのを確認して第2バイトから0xB0を引けばよろし。
もしくは2バイトずつのまとまりから0xA3B0を引けばよろし。
0639nobodyさん
04/08/16 21:53ID:???0640nobodyさん
04/08/20 09:23ID:???XSS対策のHTMLエスケープを1行で済ませ。もちろん消すのじゃなくて、特殊文字に置換するんだぞ。
0641nobodyさん
04/08/20 10:03ID:???（式）
無駄な部分や、非効率な部分がありましたら添削いただけるとありがたいです」って書けばいいのにね。。。)
0643nobodyさん
04/08/20 17:34ID:???「XSS対策のHTMLエスケープを1行で書くやり方を教えてください」
って言えばいいのにね・・・)
0645nobodyさん
04/08/20 19:58ID:???0646nobodyさん
04/08/20 20:13ID:???0647nobodyさん
04/08/21 19:21ID:zyqI2KUi置換ツールで正規表現を使いたいんですけど、
<h2>8/21</h2>
を
<h2 id="A21">8/21</h2>
という風に、「日付に当たる部分」を「idとして挿入する」という正規表現の書き方をお教え願えませんでしょうか？
#正規表現＝perlだと思って、ここにきたんですが、間違っていたら誘導お願いします。
0649nobodyさん
04/08/21 20:05ID:???御手数おかけしてすみません。
なんだか動作しませんでした。
ソースを確認したところ、
<h2>8/21</h2>
ではなくて、
<h2>8/21 タイトル</h2>
になっていたので、うまくいかなかったのかもしれません。
>>1から巡っていろいろ勉強してみます。
有難う御座いました。本当に感謝しています。
0655nobodyさん
04/08/23 19:59ID:???0656ピエール
04/08/23 22:11ID:aJIVYOH00657nobodyさん
04/08/24 03:13ID:???>アフォでもなんでもいいですよ。
なんでもよくない。間違いなくお前はアフォだ。リアルに言うと知恵遅れ。
自分がアフォだとも気づかずに必死に勉強とかやってるのってなんか空しいな。
まずは自分がアフォだと認識して、具体的にどの能力が劣るのかを知りなさい。
これからは質問前に自分の疑問と、どうしたいかっていうことをきちんとまとめてから
ここにきて書きはじめなさい。急がば回れってね。質問前に遠回りしてもしっかりまとめれば
誰かがちゃんと答えてくれるよ。
0659nobodyさん
04/08/24 18:23ID:5aeoylmiその際に受信ボックスから、携帯メール（docomo ezweb vodafone)をフィルタリングマネージャで
別のフォルダ（フォルダ1と仮定）に振り分けたいのですが、
その中でも彼女のメールだけさらに別フォルダ（フォルダ2）にしたいと思ってます。
つまり、
" ***@docomo.ne.jp " " ***@ezweb.ne.jp " " ***@*.vodafone.ne.jp "から来たメールは
フォルダ1に振り分けたいが、もしそれが彼女のアドレスの場合はフォルダ2に振り分ける、
といった感じです。
どのように記述したらいいのでしょうか？
以下、Beckyヘルプより引用
下記の正規表現がサポートされています。
^行頭にマッチします。
$行末にマッチします。
X|YXまたはYにマッチします。（X,Yは正規表現です)
[A-Z]AからZまでの間の文字にマッチします。(A, Zは任意の文字)
[^A-Z]AからZまでに含まれない文字にマッチします。
[ABC]A,B,Cのいずれかの文字にマッチします。 (A,B,Cは任意の文字)
[^ABC]A,B,Cのいずれでもない文字にマッチします。
.任意の一文字にマッチします。
X*Xの０以上の繰り返しにマッチします。 (Xは正規表現)
X+Xの１以上の繰り返しにマッチします。 (Xは正規表現)
X?Xまたは空文字列にマッチします。
()で囲んだ正規表現は解釈の優先順位が高くなります。
0660nobodyさん
04/08/24 19:08ID:???漏れがメル友に（ｒｙ
0661nobodyさん
04/08/24 19:25ID:???Becky!のフィルタの仕様がわかんないけど、
^From:.*kanojo.kawaiiyo.kanojo → まず大事なメルを保護
^From:.*(どこも|あう|ぼだほん)\.ne\.jp → 残りのうち携帯メルを振り分け
（中略）
どれにも当てはまらないもの → ベタな inbox に落ちる
こんな仕組みじゃないのかな。
むしろ、こちらでどうぞ。
メールソフト Becky! Part9
http://pc5.2ch.net/test/read.cgi/software/1090377005/
0663nobodyさん
04/09/03 00:28ID:V2uWGL3lこれでテーブルタグの中にあるカンマだけ</td><td>に置き換えたいのです。
どんなもんでしょう。
0664nobodyさん
04/09/03 02:17ID:???Perl なら
s{(?<=<table>)(.+?)(?=</table>)}
{ (my $str = $1) =~ s|,|</td><td>|g; $str }eg;
0666663
04/09/03 08:46ID:???とりあえず解析後回しで突っ込んでみたら完璧でした。
もしかして<table>〜</table>が複数ブロックあるとダメかなと思ったけどOK。
なんか自分ではまったく考えられない構文だったのでちょっと絶望感。
とりあえず誰かの役に立てばと、作ってたルーチン晒します。
アウトライン指定を行頭ピリオドの数で、行頭カンマをテーブルと判断して
自動整形。
アウトラインはH1は掲示板タイトルに使うし、H2は記事タイトルに使うから、
H3からね。
$comment = &sanitize($comment,3);
$comment = "\x0A$comment\x0A";
$comment =~ s/\x0A+/<\/p><p>/g;
$comment =~ s/<p>\.\.\.\.([^<]*)<\/p>/<h6>$1<\/h6>/gi;
$comment =~ s/<p>\.\.\.([^<]*)<\/p>/<h5>$1<\/h5>/gi;
$comment =~ s/<p>\.\.([^<]*)<\/p>/<h4>$1<\/h4>/gi;
$comment =~ s/<p>\.([^<]*)<\/p>/<h3>$1<\/h3>/gi;
$comment =~ s/<p>,([^<]*)<\/p>/<tr><td>$1<\/td><\/tr>/gi;
$comment =~ s/<tr>[^,],<\/tr>/<\/td><td>/gi;
$comment =~ s/<\/p><tr>(.*?)<\/tr><p>/<\/p><table><tr>$1<\/tr><\/table><p>/gi;
$comment =~ s{(?<=<table>)(.+?)(?=</table>)}{ (my $str = $1) =~ s|,|</td><td>|g; $str }eg;
$comment =~ s/(s?https?:\/\/[-_.!~*'()a-zA-Z0-9;\/?:\@&=+\$,%#]+)/<a href="$1" target="_top">$1<\/a>/gi;
$comment = "<p>$comment</p>";
$comment =~ s/<p><\/p>//gi;
0667nobodyさん
04/09/03 16:41ID:XAO5vI6Oファイルネームがfoo.cgiに関するリンクをすべて洗い出したいとき、
どのように書けばよいのでしょうか？
/<A 〜〜foo.cgi.*?>/ig
という感じになると思うのですが〜〜の部分がよくわかりません。
ちなみに、href=をつけていないのは、改行がはいっていたり、classなどよけいなタグが入っていることがあるためです。
0668667
04/09/03 16:56ID:???/<A .*HREF=.*foo.cgi.*?>/ig
でよろしいようですね。
検索結果がタグになっていたんで、Web表示だとうまく見えていませんでした。
0669nobodyさん
04/09/03 17:52ID:???よろしいかどうかは君が相手にしているデータ次第なわけで。
$_ = <<'EOF';
<a class="TRAP" name="href">foo.cgi</a>
<a
href="foo.cgi" class="OK">OK</a>
<a class="OK" href="foo.cgi">OK</a><a href="foo.cgi" class="OK">OK</a>
<a class="OK" href="foo.cgi"
>OK</a>
<a href="fooocgi">TRAP</a>
<a href="bar.cgi?href=foo.cgi">TRAP</a>
<a hreflang="ja" name="fooocgi">TRAP</a>
EOF
print '[', join("]\n[", /<A .*HREF=.*foo.cgi.*?>/ig), "]\n";
print "---\n";
print '[', join("]\n[", /<a\b[^>]*?\shref=[^>?]*?foo\.cgi[^>]*>/ig), "]\n";
まぁ解決したようなのでこれ以上は突っ込まんでおく。
0670nobodyさん
04/09/05 17:08ID:VHVjccb7どのような方法ありますか？
aaaaaa aaaaa aaaaaaaaaaaaa aaaa aaaaa
|← ここです →|
0671nobodyさん
04/09/05 18:32ID:???空白を正規表現で何て書くか分かったら解決な。
0672nobodyさん
04/09/05 19:42ID:???スペースでexplodeしたほうがいいんじゃないの？
0675nobodyさん
04/09/07 09:23ID:Z5/Re9xzや
<a href="../test/read.php/bbs/0987654321/155" target="_blank">>>155</a>
xxxxxxxxxx.datから上記のようなアンカーリンクを>>10のようにしたい。
どなたかお願いします。
0676nobodyさん
04/09/07 09:24ID:Z5/Re9xzや
？a href="../test/read.php/bbs/0987654321/155" target="_blank">＆ｇｔ；＆ｇｔ；155</a>
xxxxxxxxxx.datから上記のようなアンカーリンクを>＆ｇｔ；0のようにしたい。
どなたかお願いします。
0679nobodyさん
04/09/07 16:33ID:???スレ内アンカーのAタグを削除すればかなり効果があると睨んでいる。
専用ブラウザのためAタグが無くともポップアップするので困らないと思ったのだろう。
そしてアンカーを削除することに成功し、ポップアップしないことを確認し
今度は「それを元に戻す正規表現を教えて下さい」と質問しに来るのだ。
0680nobodyさん
04/09/07 17:22ID:???0682nobodyさん
04/09/07 17:49ID:???いいのか？
2chブラウザはアンカー自動でして無いと思うけど
dat直読みだろ。それでいいのか？
それなら簡単に消せるだろうが、なんに使うのか
0683nobodyさん
04/09/09 09:11ID:???「2ch」をアドレスに含まない「http」で始まるリンクにマッチさせることはできますか？
オートリンクで挿入されたリンクを対象にしています。
<a [^>]+(!?2ch)[^>]+>http
こんな感じかなあとやってみたのですが、出来ませんでした。
0684↑
04/09/09 09:13ID:???マッチする場所は問いません。
0686683
04/09/09 21:31ID:???$regexp = <STDIN>;
if($log =~ /$regexp/){
perlで上記のような感じになってるんで半分諦めていますが、
できるものなら高度な正規表現を使ってみたいと思った次第なのです。
Perl5.8.2で使える正規表現で何かいい表現はありますか？
0688683
04/09/10 10:46ID:???希望どおりにマッチしました。
[^>]を中に入れてしまえばよかったんですね。
あと ?! と !? 間違ってましたね。。。
ありがとうございました。
0689nobodyさん
04/09/13 00:58:55ID:???URLにマッチさせる際、正確に(https://とかにも)マッチするようにしたいのですが、
どうすれば一番簡潔に決められますか？
あと、メアドと電話番号のそれぞれをmailto:とteltoに置き換えたいのですが、どうすればよいか思い浮かびません。
英数@英数とかにすると電話番号@〇〇.ne.jpとかが判別できないので…
よろしくお願いしますm(_ _)m
0690nobodyさん
04/09/13 02:41:38ID:???URL: http://www.din.or.jp/~ohzaki/perl.htm#httpURL
メールアドレス: http://www.din.or.jp/~ohzaki/perl.htm#Mail
電話番号: >>594-602
0691???にマッチさせるには？
04/09/14 23:26:21ID:Kd7HVFLL$id =~ /ID:???/
とすると、エラーになりました。↓
Nested quantifiers in regex; marked by <-- HERE in m/ID:??? <-- HERE /
WindowsXPでActivePerlを使用しています。
0694691
04/09/14 23:56:41ID:Kd7HVFLLできました。ありがとうございました。
0695nobodyさん
04/09/19 15:59:53ID:???等幅のゴシックかなあ・・・。
0696nobodyさん
04/09/19 23:14:45ID:???http://pc5.2ch.net/test/read.cgi/tech/1032261438/
http://pc5.2ch.net/test/read.cgi/prog/1090997542/
0698nobodyさん
04/09/22 17:13:59ID:JesDYCu3あと、[email protected]みたいなメアドを電話番号と区別するにはどうすればよいでしょうか？
(電話番号はtel:メアドはmailto:にしたいのです)
よろしくお願いしますm(_ _)m
0699nobodyさん
04/09/22 17:46:51ID:???$'
> あと、[email protected]みたいなメアドを
> 電話番号と区別するにはどうすればよいでしょうか？
$`
0700nobodyさん
04/09/23 02:56:01ID:???0702nobodyさん
04/09/26 07:43:52ID:FGVvy0I6みたいなファイルネームの文字列から数字の部分だけを取り出して変数に代入したいんですが、どのようにすればいいんでしょうか？
0704nobodyさん
04/09/26 07:57:37ID:FGVvy0I60706nobodyさん
04/09/26 08:01:04ID:???> このスレは有用そうな正規表現を紹介したり、どう表現したらいいかわからないときに質問をしたりするためのスレッドです。
> 質問するときは使用言語や得たい結果をなるべく詳しく書きましょう。
>>701も見てみろ
0707nobodyさん
04/09/26 08:04:00ID:???0708nobodyさん
04/09/26 08:04:27ID:FGVvy0I6＞質問するときは使用言語や得たい結果をなるべく詳しく書きましょう。
て書いてありますね。
使用言語はperlです。
0709nobodyさん
04/09/26 08:15:50ID:???> このスレって丸投げもOKになった?
> 701 名前：nobodyさん 投稿日：2004/09/23(木) 04:38 ID:???
> >>700
> 最初から OK だよ。
> 但し、丸投げとバレた時点でアウト、というルール。
ちょっとは自分で努力しなさい。
やった結果がうまく出来なかった場合、漏れたちがアドバイスをしよう。
0710nobodyさん
04/09/26 08:26:31ID:FGVvy0I6ファイル名を一文字ずつ分解して配列変数に入れて、一つずつ0-9に該当するか見ていって、該当したらスカラー変数に入れてくっつけていく。
いかにも効率がわるいですが、どうすればいいですか？
0711nobodyさん
04/09/26 08:28:13ID:???0712nobodyさん
04/09/26 08:31:49ID:???0713nobodyさん
04/09/26 08:33:31ID:FGVvy0I6ということで書き込みしてるわけですが。
0714nobodyさん
04/09/26 08:36:37ID:???ってループしてる…
0716nobodyさん
04/09/26 08:51:07ID:???0717nobodyさん
04/09/26 08:51:53ID:FGVvy0I6さっきから、誰に向かって、書いてるつもりなの？
こんな質問スレで、自分にだけわかる言葉でレスつけても仕方ないと思うんだけど、
まさしく>>715はバカの壁ってやつですね。
0718nobodyさん
04/09/26 08:54:57ID:???さーて釣り宣言まだかな
0719nobodyさん
04/09/26 08:57:36ID:FGVvy0I6残念。
0720nobodyさん
04/09/26 08:58:39ID:???0722あぼーん
NGNG0723nobodyさん
04/09/28 15:15:15ID:???キーワード処理に便利なんですが。
0726nobodyさん
04/09/29 02:49:00ID:???■ このスレッドは過去ログ倉庫に格納されています