2014-01-06から1日間の記事一覧

はじめてのPerl 第8章 正規表現によるマッチ 練習問題5

練習問題4を元にaで終わるワードの直後に続く最大5文字を別のキャプチャ変数にキャプチャしてください。コードを書き換え療法のキャプチャを表示するようにしてください。 #!/usr/bin/perl use strict; use warnings; use 5.010; while (<>) { chomp; my $na…

はじめてのPerl 第8章 正規表現によるマッチ 練習問題4

練習問題3のコードを元に、$1の代わりに名前付きキャプチャを使うようにしてください。コードを書き終えてそのラベル名を表示するようにしてください。 #!/usr/bin/perl use strict; use warnings; use 5.010; while (<>) { chomp; my $names = "test"; if (…

初めてのPerl 第8章 正規表現によるマッチ 練習問題3

練習問題2を応用し、aで終わるワードを$1にキャプチャしてください。コードを書き終えて変数$1の内容をシングルクウォートで囲んで表示します。 #!/usr/bin/perl use strict; use warnings; use 5.010; while (<>) { chomp; if ($_ =~/(\b\w*a\b)/) { print …

初めてのPerl 第8章 正規表現によるマッチ 練習問題2

パターンテストプログラムを使い、ワードのどれかがaで終わっていたらマッチするようなパターンを作ってください。wilma&fredなどにもマッチするように実装してください。 #!/usr/bin/perl use strict; use warnings; use 5.010; #末尾がaで終わるものにマッ…

初めてのPerl 第8章 正規表現によるマッチ 練習問題1

パターンテストプログラムを利用して、文字列matchにマッチするパターンを記述してください。文字列beforematchafterを入力値として与えてください。 #!/usr/bin/perl use strict; use warnings; use 5.010; while (<>) { # take one input line at a time c…