逆スラッシュエスケープを使用し、大文字と小文字の変換を行います。
■後ろに続くものを強制的に変換
\Uエスケープは、その後ろに続くものを強制的に大文字にします。
\Lエスケープは、強制的に小文字にします。
"just do it"を大文字に変換し、その後小文字に変換する例です。
$_ = "just do it";
s/\b(\w+)/\U$1/g; # $_は"JUST DO IT"になる
s/\b(\w+)/\L$1/g; # $_は"just do it"になる
■1文字だけ変換
小文字のエスケープ\u, \l は次の1文字だけに作用します。
文字列内の"just"を変換する例です。
1文字だけ大文字に変換
$_ = "just do it";
s/(^\w+)/\u$1/g; # $_は"Just do it"になる1文字だけ小文字に変換
$_ = "JUST DO IT";
s/(^\w+)/\l$1/g; # $_は"jUST DO IT"になる
■1文字目だけ大文字に変換
\uと\Lを続けて指定すると、「すべてを小文字にせよ、ただし1文字目を大文字にせよ」
という意味になります。逆順に\L\uとしても同様です。
$_が "just do it" でも "JUST DO IT" でも "JuSt dO it" でも
$_は "Just Do it" になります。
s/\b(\w+)/\u\L$1/g; # $_は"Just Do It"になる
初めてのPerl 第5版/Randal L. Schwartz
- ￥3,780
- Amazon.co.jp
- 初心者にもわかりやすく書かれていますが、
全くの初心者というより、少しPerlに慣れてきた時に威力を発揮する本です。
簡単なテキスト操作のためにPerlを使用するのであれば十分事足ると思います。
- プログラミングPerl〈VOLUME1〉/ラリー ウォール
- ￥5,565
- Amazon.co.jp
ページ数も多く、価格もそれなりなので、Perlについて詳しく知りたい人向けです。
"初めてのPerl"と重複する箇所も多々あるので、これからがっちりPerlを身につけたい人は
こちらをおすすめします。