[過去ﾛｸﾞ] 正規表現道場@2ch Part3 s/煽り|荒らし/あぼーん/g (989ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
292(1): 04/02/25 20:19 ID:??? AAS
>>291
外部ﾘﾝｸ[htm]:www.din.or.jp
293: 04/02/25 22:58 ID:??? AAS
!~ はマッチしないものが選ばれるはず。
294(3): 04/02/26 12:30 ID:pqrzwzpG(1) AAS
if($FORM{'comment'} =~ /\@/) { &error; }
とした場合、
@が含まれる文が、エラーになるのは
あたりまえなのですが、
病院 という語句までも制限してしまいます。
shift-jisですけど、文字コードとかが関係しているのでしょうか？
295(1): 04/02/26 13:27 ID:??? AAS
>>294
外部ﾘﾝｸ[htm]:homepage1.nifty.com
296: 294 04/02/26 13:29 ID:??? AAS
調べたところ、
「ァ」や「院」は@と認識されてしまうみたいですね・・・
一度、他の文字に変換してから、
元に戻そうと思います・・・
297: 294 04/02/26 13:37 ID:??? AAS
>>295
ありがとうございます。
勉強します。
298(1): 04/02/26 16:11 ID:??? AAS
if($word =~ /$search/o){
print $1;
}
という処理をした時に、$search内に正規表現用文字（$や^等）が入っていた時
例）
$search = "[abc]"等
に、それを正規表現としてとらえてしまいます。
調べてみたところ、どうやらそれが正しい動作という事でしたが、
この$searchを単なる文字列として見て、例のような文字列の検索を行った時に
「aかbかc」ではなく、「"[abc]"という文字列」として検索するにはどうすれば良いんでしょうか。
299: 04/02/26 16:31 ID:??? AAS
>>298
外部ﾘﾝｸ[html]:www.kt.rim.or.jp
外部ﾘﾝｸ[html]:www.kt.rim.or.jp
以後、Perl の質問は 2chｽﾚ:php へ。
300(4): 04/02/27 00:44 ID:28vfJb2l(1) AAS
どっか勘違いしてるのでしょうか？
perlなのですが、
テキストボックスに入れた数値を$in{'count'}に格納して、
それが数字じゃなければエラー出しして終わりにしたいのですが、
数値だろうと、そうでなかろうと、いかのunlessの中を通りません。
unless ( ($in{'count'} =~ m/^[1-9][0-9]*$/) || ($in{'count'} == 0) ){
print "Content-type: text/html\n\n";
print "数字を入れてください。もどってください。";
exit;
}
301(1): 04/02/27 01:04 ID:??? AAS
>>300
こういうことか？
if ("hoge" == 0) { print "ZERO\n" } else { print "NON-ZERO\n" };
302: 300 04/02/27 01:33 ID:??? AAS
>>301
えっと、ごめんなさい、正確に言うと、
「正の整数」を入れてもらいたいので、そうでない場合は、エラーではじきたいのですが。。。
「dhfshfhjksad」みたいな適当な文字を入れてもエラーをすり抜けてしまうし、
「345」みたいちゃんとした「正の整数」を入れても、エラーをすり抜けてくれる。。。
303(1): 04/02/27 01:46 ID:??? AAS
>>300
数字は $in{'count'} =~ m/^[1-9][0-9]*$/ で真になるから unless
ブロックに入らない。(数字を含まない) 文字列を数値コンテキスト
で評価すると 0 になるので $in{'count'} == 0 で真になるから unless
ブロックに入らない。
以後、Perl の質問は 2chｽﾚ:php へ。
304: 04/02/27 03:08 ID:zgPOAYIB(1) AAS
>>292
感謝！
(?:(?!foo).)*
これかぁ〜、なるほど実験しみます。
305: 300 04/02/27 04:09 ID:??? AAS
>>303
なるほど、よくわかりました。ありがとうございます。
306: 04/02/27 21:31 ID:??? AAS
307(1): 04/02/28 22:17 ID:??? AAS
<P class="fuga">hoge</P>
こういうタグをいったんサニタイズした文字列
<P class="fuga">hoge</P>
に対して
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
まことにスマン。こんどこそ。
<P class="fuga">hoge</P>
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の特殊変数と正規表現を混同していたわけか・・・
ありがとうございました。恥ずかしい失敗ですが、一歩前進。
なんども失敗してスマン。
上下前次1-新書関写板覧索設栞歴
あと 678 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.022s