- 1 名前:デフォルトの名無しさん mailto:sage [2010/02/19(金) 16:47:06 ]
- "The duct tape of the Internet" こと、Perl についての質問箱です。
"There's more than one way to do it" ということで、 Perl の奥深さについて皆で語り合い、追求してまいりましょう。 CGI についての質問は板違いです。WEB プログラミング板でどうぞ。 CGI と Perlの区別がつかない人も WEB プログラミング板に行ってください。 (WEB プログラミング板: pc11.2ch.net/php/) CGI の質問は答えが Perl と全然関係ない話に帰着する場合が 多かったりするので WEB プログラミング板に行って聞いたほうが得ですよ。 このスレでは(CGI 以外の)純粋にPerlのみに関係する質問を取り扱っていこうと思います。 スレ違いの質問にはスルーか、速やかな誘導をお願いします。 www.perl.org/get.html ● 2010/02/19 現在の最新版: 5.10.1 ▼ 前スレ Perlについての質問箱 42箱目 pc12.2ch.net/test/read.cgi/tech/1257139591/ リンク集は >>2-3 Perl 日本語処理の基礎の基礎 >>4 過去スレは >>5-7 あたり
- 433 名前:デフォルトの名無しさん mailto:sage [2010/05/23(日) 13:41:44 ]
- >>432
ifをwhileに変えるだけ warn $1 while $str =~ m{(a[^a]a)\n\n}g;
- 434 名前:デフォルトの名無しさん mailto:sage [2010/05/23(日) 13:59:57 ]
- gオプションが付いても付かなくても
正規表現に括弧がひとつしかないから、$2と$3は未定義。 ループを回すたびに$1の内容が変わる。
- 435 名前:デフォルトの名無しさん mailto:sage [2010/05/23(日) 14:09:01 ]
- my @matches;
push @matches, $1 while $str =~ m{(a[^a]a)\n\n}g;
|

|