perl 正規表現で簡単なマッチング1
gオプションをつけて、繰り返し検索を行う。
#繰り返し検索 $string = "ABCDEFABCDABC"; #gオプションとwhileで繰り返し検索する #パターンにマッチした文字列が変数$&に入る #マッチした部分の前の文字列が$`に入る #マッチした部分の後の文字列が$'に入る print "パターン前: $`\nパターン: $&\nパターン後: $'\n\n" while ($string =~ /ABC/g);
実行結果
パターン前:
パターン: ABC
パターン後: DEFABCDABC
パターン前: ABCDEF
パターン: ABC
パターン後: DABC
パターン前: ABCDEFABCD
パターン: ABC
パターン後:
- 作者: Randal L. Schwartz,brian d foy,Tom Phoenix,近藤嘉雪
- 出版社/メーカー: オライリージャパン
- 発売日: 2012/07/25
- メディア: 大型本
- 購入: 7人 クリック: 22回
- この商品を含むブログ (17件) を見る