大小寫字母轉換：
函數 uc (uppercase) 將所有的小寫字母轉成大寫；
函數 lc (lowercase) 將所有的大寫字母轉成小寫；
Perl提供了四個內置的函數類，從而能夠輕松地改變字符和字的大小寫。函數uc()會用大寫返回其所有的參數，而lc()會用小寫返回其參數。如果沒有指定參數的話，uc()和lc()都會對$_變量進行操作。
要改變字的首字母的大小寫，就要使用ucfirst()和lcfirst()。和uc()以及lc()類似，如果沒有指定參數，ucfirst()和lcfirst()會對$_變量進行操作。
這四個函數都不會改變其參數；它們只是會返回其參數的副本，而這個副本經過了改變。所以，你必須將結果分派給一個變量或者打印它，或者用其他的方式使用返回的值。像下面這樣做是一個常見的錯誤：
|
1
2
3
|
$a = 'hello';uc($a);print $a; |
第一眼看上去，你可能會預計這段代碼將打印“HELLO”。但是，由于uc()沒有更改其參數，所以它的結果只打印了小寫的“hello”。要獲得預期的結果，就要使用像下面這樣的代碼：
|
1
2
3
|
$a = 'hello';$a = uc($a);print $a; |
更改字的大小寫的另一種方式，是對雙引號里面的字符串使用/L和/U逸出序列。使用下面的代碼你可以獲得與前面相同的結果：
|
1
2
|
$a = 'hello';print "/U$a/E"; |
逸出字符/E會結束前面逸出字符（在這里是/U）開始的內容。
利用Perl內置的大寫和小寫函數，以及雙引號里的逸出字符/U和/L，改變（字符的）大小寫是很容易的。
單詞首字母大寫
|
1
|
$str =~ s/(\w+)/\u$1/ |
在perl中，我們可以通過uc,lc,\U,\L來修改變量的大小寫。其中uc，\U是將變量中的字母全部轉換為大寫，對應的lc和 \L是將變量中的字母全部轉換為小寫。如果我們只想將變量的首字母大寫或將變量的首字母小寫，我們可以使用perl提供給我們的另外兩個函數 ucfirst和lcfirst來實現，下面我們來看一個具體的例子：
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
#! /usr/bin/perluse strict;use warnings;my $little = "hello";print "little:$little\n";my $big = uc($little);print "big:$big";$little = lc($big);print "little:$little\n";$big = "\U$little";print "big:$little";$little = "\l$big";print "little:$little\n";$big = ucfirst($little);print "big:$little\n";$little = lcfirst($big);print "little:$big\n"; |
上面的這個程序打印的結果如下：
hello
HELLO
hello
HELLo
hello
Hello
hello
這篇到這就結束了，服務器之家小編特為大家整理了好幾篇文章，希望以后大家多多支持服務器之家。
