# Perlで大文字を小文字に変換する方法
lcを使う, 大文字にしたい時には, ucを使う
```perl
$val = lc $val;
```
## サンプルコード
変数に代入しながら置換を行うサンプルコードも作成
```perl
#!/usr/bin/perl
my $word = "The quick brown fox jumps over the lazy dog";
print("$word\n");
# 大文字を小文字に変換する
$lowerWord = lc $word;
print("$lowerWord\n");
# 小文字を大文字に変換する
$upperCase = uc $word;
print("$upperCase\n");
# 変数に代入しながら置換を行う
(my $val = $word) =~ s/brown/yellow/;
print("$val\n");
print("$word\n");
```
0 件のコメント :
コメントを投稿