perl提供了四个内置的函数类,从而能够轻松地改变字符和字的大小写。函数uc()会用大写返回其所有的参数,而lc()会用小写返回其参数。如果没有指定参数的话,uc()和lc()都会对$_变量进行操作。
要改变字的首字母的大小写,就要使用ucfirst()和lcfirst()。和uc()以及lc()类似,如果没有指定参数,ucfirst()和lcfirst()会对$_变量进行操作。
这四个函数都不会改变其参数;它们只是会返回其参数的副本,而这个副本经过了改变。所以,你必须将结果分派给一个变量或者打印它,或者用其他的方式使用返回的值。像下面这样做是一个常见的错误:
$a = 'hello';
uc($a);
print $a;
第一眼看上去,你可能会预计这段代码将打印“HELLO”。但是,由于uc()没有更改其参数,所以它的结果只打印了小写的“hello”。要获得预期的结果,就要使用像下面这样的代码:
$a = 'hello';
$a = uc($a);
print $a;
更改字的大小写的另一种方式,是对双引号里面的字符串使用L和U逸出序列。使用下面的代码你可以获得与前面相同的结果:
$a = 'hello';
print "U$aE";
逸出字符E会结束前面逸出字符(在这里是U)开始的内容。
利用perl内置的大写和小写函数,以及双引号里的逸出字符U和L,改变(字符的)大小写是很容易的。
James Brown具有20年的行业开发专长和经验,拥有多重工作背景,包括数字硬件设计,网络操作系统开发和分布式计算等。