Perlについての質問箱 30箱目at TECHPerlについての質問箱 30箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト190:184 07/04/05 23:38:24 >>189 の while ($' =~ //) は while ($' =~ //o) を考えています 今docを読み込んでいるんですが ()+ でのグループの繰り返しマッチングの 全リスト取得は、正規表現工夫しても仕様的に無理なのかな… 191:184 07/04/05 23:40:39 push(@a, $a) の行も間違えていました… 慌てて書き上げたもので 連投すみません 192:デフォルトの名無しさん 07/04/05 23:44:49 AAAとZZZの間だけでいいのか？ AAAの前や、ZZZの後ろは無視していいのか？ 193:デフォルトの名無しさん 07/04/05 23:47:12 あと、入力データと出力データの例を具体的に示してくれ。 入力文字列と、それに対する@aの中身はどうなるのか。 194:デフォルトの名無しさん 07/04/05 23:51:08 >>190 1対の括弧につき1つの値が保存される仕様なんだから、 1回のマッチにおいて1対の括弧で複数個の値を得るのは そりゃ無理だわな。 それに複雑な正規表現でバックトラックの嵐にするより、 幾つかのシンプルな処理に分けた方が速い。 if (/AAA/g) { push @a, $1 while /\G(foo|bar|baz)/g; } 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch