正規表現道場@2ch Part3 s/煽り|荒らし/あぼーん/g

[過去ﾛｸﾞ] 正規表現道場@2ch Part3 s/煽り|荒らし/あぼーん/g (989ﾚｽ)
上下前次 1-新

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索歴削→次ｽﾚ栞削→次ｽﾚ過去ﾛｸﾞﾒﾆｭｰ

306: 04/02/27 21:31 ID:??? AAS

307(1): 04/02/28 22:17 ID:??? AAS
hoge

こういうタグをいったんサニタイズした文字列

hoge

に対して

m/<(P|H[1-6]|ADDRESS|PRE|BLOCKQUOTE|DIV|OL|UL|DL)(| class="\w{1,20}")>(.*)<\/$1>/
省2

308(1): 04/02/28 22:22 ID:??? AAS
あ、失敗^-^;
実体参照されちまった。こうです。

&lt;P class="fuga"&gt;hoge&lt;/P&gt;

m/&lt;(P|H[1-6]|ADDRESS|PRE|BLOCKQUOTE|DIV|OL|UL|DL)(| class=&quot;\w{1,20}&quot;)&gt;(.*)&lt;\/P&gt;/

309(1): 04/02/28 22:25 ID:K5IxNsG1(1) AAS
まことにスマン。こんどこそ。

hoge

m/<(P|H[1-6]|ADDRESS|PRE|BLOCKQUOTE|DIV|OL|UL|DL)(| class="\w{1,20}")>(.*)<\/P>/

310(1): 04/02/28 22:26 ID:??? AAS
>>307-309
外部ﾘﾝｸ[html]:www.kt.rim.or.jp

311: 04/02/28 22:32 ID:??? AAS
>>310
く、なるほど。perlの特殊変数と正規表現を混同していたわけか・・・

ありがとうございました。恥ずかしい失敗ですが、一歩前進。

なんども失敗してスマン。

312(1): 04/02/29 14:20 ID:tS63OhT8(1) AAS
PHPで入力された文字がEUCの半角カナのみかチェックしたいです。
整数のみのチェックは正規表現でできました。

^[0-9]+$ 整数のみの正規表現
EUCの半角カナのみの正規表現は？

313: 04/02/29 14:29 ID:??? AAS
そこまでわかってるならヒント

^(ｱ|ｲ|ｳ|ｴ|ｵ)+$

314: 04/02/29 15:25 ID:??? AAS
>>312
EUC の半角カタカナは、SS2 (8E) + JIS X 0201 カタカナ (A1-DF) だから、
こんな感じでいけそうな気がします。
いかがでしょうか。

^(\x8E[\xA1-\xDF])*$

315: 04/02/29 17:41 ID:??? AAS
マルチにレスすんなよ。
PHPスレで聞いてる

316(1): 04/03/01 00:32 ID:uvhpNWvz(1) AAS
aaa@a.jp?subject=？？？？
の?以降の件名部分をPHPで削除したいんだけど、

$str= ereg_replace("/?.*/", "" , $str);

では無理だった・・。
これではお話になりませんか？

317(1): 04/03/01 00:56 ID:??? AAS
?は０文字か１文字を表すメタ文字の予感

318(1): 316 04/03/01 02:31 ID:??? AAS
317さんのご指摘の元、色々やって出来た予感。
要らないかもしれないけど、書いときます。

$mail = "a@a.a?subject=件名"
preg_match("/^[\w\-\.]+@[\w\-]+\.[\w\-\.]+/","$mail", $matches);
$mail = $matches[0];

正解かどうかわかりませぬが、これでやっていこうと思います。

319: 04/03/01 02:44 ID:??? AAS
>>318
>>317 が言いたかったのは /\?.*/ と思われ。
まあそれで解決してるならいいんだけどね。

320(1): 04/03/03 11:51 ID:??? AAS
リモートホストを
1.英数字のピリオド区切り
2.英数字のみ
のいずれかの条件でマッチさせようと思い、
(リモホ) =~ m/^(\w+\.?)+\w+$/
などとやったのですが駄目なようで、これ以上思い浮かびません。
どうすれば良いのでしょう。

321(1): 04/03/03 15:08 ID:??? AAS
>>320
こうじゃね？
m/^(\w+\.)*\w+$/

もうちょっと仕様どおりちゃんとやるならこう？
m/^(?:[0-9a-z]+\.)*[0-9a-z]+$/i

322: 04/03/04 01:43 ID:??? AAS
ああそうか区切る時は前の方(やや不適切な言い方ですが)の
有無を調べれば良かったんですね。
ありがとうございました。

323(1): 04/03/05 07:43 ID:??? AAS
$charactorにひらがな（あーん）以外が含まれているかどうか判断したいのですが

if ( $charactor =~/[^あ_ん]/) {
print "あーんを以外含んでいます。\n";
}
というふうにしてみたのですが
上手くいきません
自分では見当がつかないのでアドバイスをください

324(1): 04/03/05 10:53 ID:??? AAS
>>323
-

325(2): 04/03/05 11:00 ID:??? AAS
Perlメモによると
># 全角ひらがな [ぁ-ん]
>$Zhiragana = '(?:\xA4[\xA1-\xF3])'; # EUC-JP
>$Zhiragana_sjis = '(?:\x82[\x9F-\xF1])'; # SJIS

なので、EUC-JPならこうかな。つかPerl分からん。
if (!$charactor =~/^(\xA4[\xA1-\xF3])*$/) {
print "ひらがな以外を含んでいます。\n";
}

上下前次 1-新書関写板覧索設栞歴

あと 664 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.024s