トップページ⇒php
981コメント301KB

正規表現道場@2ch Part4

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん05/01/17 11:51:25ID:SH1ygN1P
Perlに限らずスクリプト系言語で大活躍の正規表現。
このスレは有用そうな正規表現を紹介したり、
どう表現したらいいかわからないときに質問をしたりするためのスレッドです。
質問するときは使用言語や得たい結果をなるべく詳しく書きましょう。

註:& や " を書くときには、& " と描いておきましょうね。

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/
0039nobodyさん05/01/22 17:04:14ID:Z5CU+gTj
>>38
正規表現が使えるソフトは自分でみつけました。
あとはそこに%$?みたいな記号を入れるのですが、それがわからないのです。
0040nobodyさん05/01/22 17:06:17ID:???
>>37
grepでいいでしょ。

明らかに板違いだね。

ココから来たのかよ。
気軽に「こんなソフトありませんか?」 6
http://pc5.2ch.net/test/read.cgi/software/1104587671/695

とりあえず、放置推奨 >all
0041nobodyさん05/01/22 17:08:33ID:???
>>39
しょうがないな。

そのソフト名が俺らにはわからんから、アドバイスするのは不可能。
0042nobodyさん05/01/22 17:31:54ID:???
>>39
>>1から調べられる
0043nobodyさん05/01/25 07:32:45ID:???
>>29
$strが漢字一文字の時マッチ。
preg_match("/^[\xb0-\xff][\xa0-\xff]$/", $str)

意図が今ひとつ分からないから、こんなもんで。
0044nobodyさん05/01/26 10:23:23ID:???
「」に囲まれていないタグ(<と>)を<、>に変換したいのですがどのようにすればよいでしょうか?
逆に囲まれているというのは出来るのですが囲まれていない方が分からないです。。。
0045nobodyさん05/01/26 10:27:00ID:???
すいません。上の変換後の文字は「&lt;」「&gt;」です。
0046nobodyさん05/01/26 13:29:10ID:???
>>44
囲まれているのができるのならば、

(1) 囲まれている<と>を適当にぶつからない文字or文字列に変換する。
制御文字とかがオススメ。
(2) 残った全ての<と>は囲まれていないのでお前の好きなように変換する
(3) (1)で変換したものを元の<と>に戻す

とすればいいはずだな。
0047nobodyさん05/01/26 13:30:28ID:???
>>44
Perl でいい?ちょっと苦しい感じもするけどこんなのとかどうでしょう?

$str =~ s/(?:(「.*?」)|(\<))/$1||"<"/ge;
$str =~ s/(?:(「.*?」)|(\>))/$1||">"/ge;
00484705/01/26 13:33:15ID:???
ガーソ!
置換後のダブルクォーテーションの中は「&lt;」「&gt;」です。

$str =~ s/(?:(「.*?」)|(\<))/$1||"&lt;"/ge;
$str =~ s/(?:(「.*?」)|(\>))/$1||"&gt;"/ge;
0049nobodyさん05/01/26 13:51:01ID:???
>>46 >>47
おおぅ!ありがとうございます。おかげで実現出来ましたm(_ _)m
0050nobodyさん05/01/26 20:12:30ID:???
>>44>>47
&amp;lt;って書きたいときには&amp;amp;lt;って書けばいいんだよ。
0051nobodyさん05/01/27 01:51:00ID:???
SQLのエスケープをしようと、「'」「\」「%」は全て「\'」「\\」「\%」に
変換する正規表現を書いてみました。

$sql =~ s/(\'|\\|\%)/\\$1/g;

正常に動作しているみたいなのですが、異常系のパターン
文字列等ございましたらご指摘いただきたい次第です。

宜しくお願いします。
0052nobodyさん05/01/27 14:08:43ID:???
>>51
それで特に問題ないように思うけど、
そもそもな話で、SQL のエスケープの仕様ってそれで良いの?っていうのと、
DB のライブラリにはエスケープする関数が用意されてることが多いので
そっちを調べた方が良い気がする。
0053nobodyさん05/01/28 02:31:31ID:???
>>52
ご返答有難うございます。
おそらくこの3つをエスケープすれば良いかと思うのですが、
他にもあるのでしょうかね、、

スレ違いっぽいので他のところで聞いてみます。
0054nobodyさん05/01/28 12:52:16ID:???
$a = "a1a2a3a4s1s2s3s4d1d2d3d4f1f2f3f4"
%a = $a =~ /([a-z])(\d)/g;
とすると
$a{a} == 1;
のようになりますが、括弧が4つの時に$2と$4だけを毎回ハッシュに渡すには
どうすればいいんですか?

%a = $a =~/(([a-z])\d)([a-z](\d))/g;

$2と$4だけを毎回%aに渡したいのです。
0055nobodyさん05/01/28 13:08:00ID:???
>>54
(?: ) で後方参照されなくなるので、こうするとか。

%a = $a =~/(?:([a-z])\d)(?:[a-z](\d))/g;
00565405/01/28 13:37:42ID:???
>>55
ありがとうございました!
00575405/01/28 13:50:40ID:???
すみませんもう一つHTMLに対しての正規表現なのですが、
$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:???
>>57
一発でマッチする方法はあるかなあ?俺はこんなのしか思いつかなかった。
my $params = ($html =~ m{<input\s+type="hidden"([^>]+)>})[0];
my %hidden = $params =~ m{(?:\s+(\w+)="([^"]+)")}g;
0059nobodyさん05/01/28 22:09:22ID:???
>>57
素直に 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:???
>>60
それいいなw
%hidden =
  $html =~
    /<input(?=.*?\btype="hidden")(?=.*?\bname="(.*?)")(?=.*?\bvalue="(.*?)").*?>/g;
こうすると type=hidden が後ろになっても取れるのかー。戴きます。
0062nobodyさん05/01/30 19:07:48ID:60wlVefX
質問です。

test.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
>>62
どのような正規表現で処理したら良いのか教えてください。
0066nobodyさん05/01/30 20:23:18ID:???
>>62
行頭の|を<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:???
Perlで、
\Q〜〜\E
はどういう意味ですか?
0068nobodyさん05/01/30 21:23:52ID:???
>>67
>>1
0069nobodyさん05/01/30 21:44:03ID:???
各サイトでCtrl+Fしてみましたが、\Qも\Eも見つかりませんでした
0070nobodyさん05/01/30 22:24:11ID:???
>>69
誰が Ctrl+F しろと言った?見つかるまで全て読めよ。
0071nobodyさん05/01/31 01:31:35ID:???
いや、普通にマニュアル読んだほうが早いが・・
0072nobodyさん05/01/31 07:14:59ID:???
すみません、たまたまJAVAスレを見ていたら書いてありました;
0073nobodyさん05/01/31 12:58:10ID:???
>>70
調子こいてんじゃねーよ。雑魚が。
0074nobodyさん05/01/31 13:13:56ID:???
m9(^Д^)プギャーーー!!
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:???
>>75
<body(.*)>(<script.*script>\r\n)((.*\r\n)*)</body>

<body$1>\r\n$3$2</body>
0077nobodyさん05/02/02 15:04:00ID:???
perlで文中の"&"を"&"に変換したいと思ってます。
でも"¥"などの実体参照化されてる部分の"&"は変換しません。
で自分なりに考えたのですが↓

$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:???
どこから突っ込んだものか・・・
00797705/02/02 15:12:58ID:???
再びすいません実体参照部分が化けてしまいました、文中の全角記号、英字は実際は半角です;;

perlで文中の"&"を"&amp;"に変換したいと思ってます。
でも"&yen;"などの実体参照化されてる部分の"&"は変換しません。
で自分なりに考えたのですが↓

$text="<p>キュウリ&ナス=&yen;200</p>";
$text=~s/&[^(yen;|euro;|amp;|copy)]/&amp;/g;
print "$text¥n";

を実行すると、結果が

<p>キュウリ&amp;ス=&yen;200</p>

となり、うまくいきません。
2行目の正規表現がおかしいと思うのですが、どう変えたらいいのでしょうか?
よろしくお願いします。
0080nobodyさん05/02/02 15:33:41ID:???
>>77
これでどう?

$text =~ s/(?:(&(?:yen|euro|amp|copy);)|&)/$1?$1:"&amp;"/ge;
0081nobodyさん05/02/02 15:37:52ID:???
ここに居る人たちからすると10点くらいの答案だと思う
00828005/02/02 15:39:46ID:???
>>81
ならどこがどうダメとかこうしろとかくらい言ってくださいな。
0083nobodyさん05/02/02 15:41:22ID:???
この質問者にレスを打っただけで50点はかたいだろ。
00847705/02/02 15:41:45ID:???
>>80
難しすぎて分かりませんが、バッチリ出来ました!
ありがとうございます。
0085nobodyさん05/02/02 15:50:43ID:???
$text=~s/&[^(yen;|euro;|amp;|copy)]$/&amp;/g;
0086nobodyさん05/02/02 19:20:05ID:???
偉そうにしてるだけのカスがいるようだなw
ダメだとか言う前に自分のコード見せてみなm9(^Д^)プギャー
0087nobodyさん05/02/02 19:25:17ID:???
煽ってるだけの人も、変わらんかとm9(^Д^)プギャー
0088nobodyさん05/02/02 21:33:17ID:???
>>77
$text =~ s/&(?!(?:yen|euro|amp|copy);)/&amp;/g;
0089nobodyさん05/02/02 23:52:44ID:???
つーか問題は本当にこの4つだけでいいのかってことだろ。

HTML4 で使える文字実体参照
http://www.ne.jp/asahi/minazuki/bakera/html/reference/charref
0090nobodyさん05/02/02 23:56:25ID:???
$text =~ s/&$/&amp;/g;
0091nobodyさん05/02/03 04:21:06ID:???
考えてみたけど汎用的なのはどうやっても無理
0092nobodyさん05/02/03 04:59:36ID:???
>>89
それは >>77 が判断すればいいことで、わざわざそんな表を持ち出す話ではない。
0093nobodyさん05/02/03 06:34:35ID:???
>>92
77を100回読んで出直してください
0094nobodyさん05/02/03 06:43:00ID:???
一から教え込むスレじゃないんで、既存のを丸パクりしろって回答で100点じゃね。
0095nobodyさん05/02/03 07:26:47ID:???
>>94はやりチン包茎
0096nobodyさん05/02/03 09:12:37ID:???
m9(♥Д♥)プギャー
0097nobodyさん05/02/03 13:43:04ID:???
my %entref = (
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:???
見易さかな?
0100nobodyさん05/02/03 22:15:55ID:???
>>98
古い車輪はある?
0101nobodyさん05/02/03 22:25:28ID:???
「車輪」言いたかっただけちゃうんかと
0102nobodyさん05/02/03 22:50:41ID:???
根こそぎひろってハッシュサーチのほうが性器表現でやるより早いってとこだろ。
古い車輪だと機械的に最小の性器表現を生成したりするんだが、まず読めないし遅い。
0103nobodyさん05/02/03 23:37:30ID:???
スピードにばらつきが出ないだけで、体感的にはかわらなそう
01049705/02/04 00:47:42ID:???
いや、速度とかはどうでもよくてメンテナンス性重視のつもり。
0105nobodyさん05/02/04 18:09:48ID:???
>>104
今どきだな。俺も保守的なので97のコードはいいと思う。
0106nobodyさん05/02/05 10:31:05ID:???
結局ココの奴もたいしたことない。
0107nobodyさん05/02/05 10:56:10ID:???
>>106
。・゚・(ノД`)・゚・。
0108nobodyさん05/02/05 13:29:53ID:???
>>106
大したこと無いのは俺とお前だけで、
他のみんなすげえよ!俺なんかすげえ人間が小さいの。
0109nobodyさん05/02/05 14:18:00ID:???
実は考えてたんだけど、>>97さんに先を越されて出せなかったやつを出してみる。
三項演算子使いまくりなのはuse warnings対策。
中身はほぼ>>97さんと同じ。

my %sp = map{$_ => 1} qw(
quot amp lt gt

nbsp iexcl cent pound
curren yen brvbar sect uml copy ordf laquo
...
lceil rceil lfloor rfloor lang rang loz
spades clubs hearts diams
);

$text =~ s/&(?:(\w{2,8});)?/$1 ? ($sp{$1} ? "&$1;" : "&amp;$1;") : "&amp;"/ge;
0110nobodyさん05/02/05 14:28:42ID:???
気の済むまでハッシュを手書きする仕組みはむしろメンテナンス性低いと思った。
Wikiでプラグインをコールするような用途に向いていている。

&amp;置換だけなら、よくある(?![\w\d]+;|#x?[A-Fa-f0-9]{1,6};)みたいので十分では。適当だけど。
全部羅列するならDTD依存で生成するから、コンパイラが吐いた長い正規表現でも、スクリプト生成の
でかいハッシュでも、保守性は変わらないかな。【代】
0111nobodyさん05/02/05 16:39:25ID:???
どれだけ厳密なものが必要かは、分からないから。
完全にstrictなHTMLが必要なのかも知れ無いし。

ハッシュ作るのマンドクセなら、他のモジュールから借用する手もある。
内部の変数に依存しているから、使い捨てのスクリプト程度にしか使えないけどね。

use HTML::Entities;
...
$text =~ s/&(?:(\w{2,8});)?/$1 ? ($HTML::Entities::entity2char{$1} ? "&$1;" : "&$1;") : "&"/ge;
0112nobodyさん05/02/05 16:47:00ID:???
>>50 をテンプレに入れとくべきだな。
0113109=11105/02/05 17:00:43ID:???
>>112
たまたま忘れただけさ orz

$text =~ s/&(?:(\w{2,8});)?/$1 ? ($HTML::Entities::entity2char{$1} ? "&$1;" : "&amp;$1;") : "&amp;"/ge;
0114nobodyさん05/02/07 17:45:23ID:???
DTDぶっこ抜きだから面倒臭さも保守性もかわらんという話だろ
0115名無しさん@Vim%Chalice05/02/07 18:32:59ID:cdJVzA6k
Cのソースを追うことが多く、何の変数でもいいので
とにかく変数を検索するための正規表現を作りましたが
全然だメッス。↓が限界
\b[A-z_][A-z0-9_]*[\s]*?[^\(]
0116名無しさん@Vim%Chalice05/02/07 19:01:26ID:cdJVzA6k
>>115
変数はつらいが、関数もしくはメソッドならこれだぜ!!
(?=.)(?!(if|while|for|switch))\<[A-z_][A-z0-9_]*?[\s]*?(?=\()
0117nobodyさん05/02/08 00:19:26ID:aXE3qbDZ
はじめまして、
"【PHP】くだらねぇ質問はここに書き込みやがれpart3" から誘導されてきました。

HTMLソース内に記述されている画像ファイル名を抽出しようと四苦八苦しています。
画像ファイル名は相対パスで指定されており、「../../」の部分も一緒に抽出させたいのです。
検索条件をお教えいただけないでしょうか。

$html = HTMLソース;
eregi("xxxxxxxx", $html, $var);

-- このような結果が返ってくる --
 $var[0] == "../../aaa.jpg";
 $var[1] == "image/bbb.gif";
 ・
 ・
 ・

お力添えをお願い致します。
0118nobodyさん05/02/08 00:43:32ID:???
>>117
preg_match_all('!<img .*src.*"(.+?)"!', $html, $var)

こういうやつとか?
0119nobodyさん05/02/08 07:52:30ID:???
>>118
<img src='hoge.jpg'>
<img src=hoge.jpg>
012011705/02/08 09:49:40ID:9oMQzPoD
>>118
ありがとうございます!
マニュアルを見てみると、preg_match_all関数のほうが良さそうですね。
さりげなく教えていただき、大変感謝です。

あとは119で指摘されているクォーテーションマークの問題を
色々試して解決してみます。

あ〜正規表現を勉強しないと…(汗)
0121nobodyさん05/02/08 10:09:22ID:???
便乗で質問です。
>>119の問題を回避するとしたらこんな感じでよろしいのでしょうか?

preg_match_all('!<img .*src=('|\")(.+?)('|\") .*>!', $html, $var)
012212105/02/08 10:10:46ID:???
間違えました
preg_match_all("!<img .*src=('|\")(.+?)('|\") .*>!", $html, $var)

です…
0123nobodyさん05/02/08 12:43:15ID:???
駄目。つかテストしろ。
0124nobodyさん05/02/09 10:01:21ID:???
<から>のタグの抽出を行っているんですが、
< >の中ににある ” ”または ’ ’の中にある > は無視したいんですが、
どうしたらよいでしょうか・・・。

012512405/02/09 10:03:20ID:clTgmqY1
あ、ちなみに、PHPのpreg_replace_callbackで
抽出しております。。
宜しくお願いします。
0126nobodyさん05/02/09 13:09:04ID:???
>>124
こんなのとか。
'/<\w+(?:\s+(?:"[^\"]+"|\'[^\']+\'|[^"\'\>]+)+)?>/'
0127nobodyさん05/02/09 15:19:31ID:???
>>126
ありがとうございます。
貼り付けてみたんですが、Parse errorになっちゃいました
何がまずいんでしょうか・・・
0128nobodyさん05/02/09 15:43:59ID:???
>>127
ごめんなさい。それは私のミスでした。
0129nobodyさん05/02/09 18:24:51ID:???
>>124
ベタ取得、"'でとめて引用符内を取得の1以上繰り返し
0130nobodyさん05/02/09 19:56:51ID:???
>>124
'/<\/?\w+(?:\s+(?:(?:\w+\s*=\s*(["\']?).*\1)|noshade|selected|checked|multiple|noresize))*>/'
こんなとこで。
見落としありそうだけど。
0131nobodyさん05/02/09 20:13:34ID:???
>>130
たとえば '<a a=><a>' とか '<a a=""><a a="">' とかでダメっぽい。
013213005/02/09 20:47:31ID:???
>>131
なるほど
'/<\/?\w+(?:\s+(?:(?:\w+\s*=\s*(["\']?).*?\1)|noshade|selected|checked|multiple|noresize))*>/'
とりあえず対応してみる。
0133nobodyさん05/02/10 16:49:24ID:???
PHPにはタグを抜き取る関数があるだろ
0134nobodyさん05/02/10 16:51:05ID:???
まじ?
0135nobodyさん05/02/10 17:02:07ID:???
strip_tags
ttp://jp.php.net/manual/ja/function.strip-tags.php
0136nobodyさん05/02/10 17:38:07ID:???
つか何でタグなのに引用府内に<>が入ってんの?
013713605/02/10 17:43:29ID:???
一行レスじゃ芸がないので代案
'/<(?:[^"\'>]*?|"[^"\\\\]*(?:\\\\.[^"\\\\]*)*")*>/'

>>132
<a href=">" />も
0138nobodyさん05/02/10 17:56:42ID:???
<a href=">" >か<object data=">" />にしとけ。
013913005/02/10 21:00:18ID:???
>>137
ども、対応してみる。
'/<\/?\w+(?:\s+(?:(?:\w+\s*=\s*(["\']?).*\1)|noshade|selected|checked|multiple|noresize))*\s*\/?>/'

これはいかがですか。
<![INCLUDE CDATA [ >>> ]]>
<script><!-- if (a>c) --></script>
■ このスレッドは過去ログ倉庫に格納されています