開発環境
- OS X Lion - Apple(OS)
- BBEdit(Text Editor)
- プログラミング言語:Perl
『初めてのPerl 第6版』(Randal L. Schwartz, Tom Phoenix, brian d foy 共著、近藤 嘉雪 訳、オライリー・ジャパン、2012年、ISBN978-4-87311-567-2)の8章(正規表現によるマッチ)、8.10(練習問題)3を解いてみる。
その他参考書籍
3.
コード(BBEdit)
sample.pl
#!/usr/bin/env perl use strict; use warnings; use utf8; use 5.016; binmode STDOUT, ':utf8'; binmode STDIN, ':utf8'; while (<>) { chomp; if (/\b(\w*a)\b/) { print "Matched: |$`<$&>$'|\n"; print "\$1 contains '$1'\n"; } else { print "No match: |$_|\n"; } }
入出力結果(Terminal)
$ ./sample.pl test.txt No match: |A| Matched: |<a>| $1 contains 'a' Matched: |<kamimura>'s blog| $1 contains 'kamimura' Matched: |http://<sitekamimura>.blogspot.com| $1 contains 'sitekamimura' No match: |KMI| Matched: |http://www.<mkamimura>.com | $1 contains 'mkamimura' No match: |Fred| No match: |FRED| No match: |fred| No match: |frederick| No match: |Alfred| No match: |fred flintstone| No match: |Mr. Slate | No match: |Mississippi| No match: |Bamm-Bamm | Matched: |<wilama>| $1 contains 'wilama' No match: |barney| Matched: |<wilma> and fred| $1 contains 'wilma' Matched: |fred and <wilma>| $1 contains 'wilma' Matched: |<Wilma> and Fred | $1 contains 'Wilma' Matched: |Fred and <Wilma>| $1 contains 'Wilma' Matched: |<wilma>&fred| $1 contains 'wilma' Matched: |Mrs. <Wilma> Flintstone | $1 contains 'Wilma' Matched: |I saw <Wilma> yesterday| $1 contains 'Wilma' Matched: |I, <Wilma>!| $1 contains 'Wilma' No match: |Z| Matched: |<llama>| $1 contains 'llama' $
0 コメント:
コメントを投稿