2012-01-01から1ヶ月間の記事一覧

tr///による置換(第8章「もっと正規表現」続き)

英語の大文字と小文字を入れ替えたい場合に以下のようにしてもダメだ。 my $str = "How I wonder what you are.\n"; $str =~ s/[A-Z]/lc($&)/ge; $str =~ s/[a-z]/uc($&)/ge; print $str; http://ideone.com/IJRrI すべて大文字になってしまう。 そこで、tr/…

置換s///(第8章「もっと正規表現」続き)

今までは主に正規表現での検索についてやってきたけど、今回は検索した結果を置き換える置換s///に関して。 簡単な置換 置換には「s///」という機能(これは演算子?手続き?関数?構文????)を使うそうな。 次のようなスクリプトを実行すると、 my $str…

正規表現についていくつか

$1とか$2とかについて 選択させたい部分をカッコで囲むことがあるけど、やっぱりそれも$1とか$2とかを束縛するのかな?やってみよう。 my $str = 'interior and exterior'; while ($str =~ /(in|ex)\w+/g) { print "\$& = $&, \$1 = $1\n"; } http://ideone.…

第8章「もっと正規表現」

もっと正規表現をやるそうな。 マッチした範囲を複数個取り出す$1、$2、$3 my $str = '168,57,37'; if ($str =~ /(\d+),(\d+),(\d+)/) { my $height = $1; my $weight = $2; my $age = $3; print "\$height = $height\n"; print "\$weight = $weight\n"; pri…