アルファベットを大文字または小文字に変換する(全角半角混合) – Perl

  • このエントリーをはてなブックマークに追加
  • LINEで送る
この記事は 2007年3月5日 に書かれたものです

文字列内のアルファベット(英字)を、大文字または小文字に変換したい。 全角文字、半角文字が一緒になっている場合はJcode.pmを利用すれば良い。

trメソッドを用いて、単純に置換してやれば良い。置換条件に半角文字の指定を加えれば全角・半角の変換が同時に行える。半角英小文字は半角英大文字、全角英小文字は全角英大文字になる。

- Sponsored Link -
## サンプル
;#
;#大文字・小文字変換
;#

use Jcode;

#-- 小文字を大文字へ --#
print Jcode->new('aabbccddeeffgg')->tr('[a-za-z]', '[A-ZA-Z]')->sjis, "\n";

#-- 大文字を小文字へ --#
print Jcode->new('AABBCCDDEEFFGG')->tr('[A-ZA-Z]', '[a-za-z]')->sjis, "\n";

実行例

AABBCCDDEEFFGG
aabbccddeeffgg

コメント

ご感想やご質問などお気軽にどうぞ。書き込むにはfacebookへのログインが必要です。

このブログを応援する

お寄せいただいたお気持ちは全額サーバ代や次の記事を執筆するための原資として活用させていただいております。この記事が参考になった場合などぜひご検討ください。

PayPal(ペイパル)
PayPalで300円支払う
※金額は任意で変更できます。
※100円でも泣いて喜びますw
※住所の入力欄が現れた場合は「no needed」を選択ください
これまでのご協力者さま
- Sponsored Link -