平时做技术实践时，很多问题不是概念不会，而是细节没串起来。拿“perl uc,lc,ucfirst,lcfirst大小写转换函数”来说，它看着像小点，放到项目里常会牵出环境、配置、兼容性和维护成本。下面按实际采用顺序，把思路、关键写法和容易踩坑的地方讲清楚，便于大家直接对照操作。

大小写字母转换：

函数 uc (uppercase) 将所有的小写字母转成大写；

函数 lc (lowercase) 将所有的大写字母转成小写；

从实现思路看，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$a/E"; 

逸出字符/E会结束前面逸出字符（在这里是/U）开始的内容。

结合项目来看，借助Perl内置的大写和小写函数，以及双引号里的逸出字符/U和/L，改变（字符的）大小写是很容易的。

单词首字母大写

$str =~ s/(w+)/u$1/

从实现思路看，在perl里，我们能够借助uc,lc,U,L来修改变量的大小写。其中uc，U是将变量中的字母全部转换为大写，对应的lc和 L是将变量中的字母全部转换为小写。如果我们只想将变量的首字母大写或将变量的首字母小写，能够采用perl提供给我们的另外两个函数 ucfirst和lcfirst来实现，下面我们来看一个具体的例子：

#! /usr/bin/perl
use strict;
use warnings;

my $little = "hello";
print "little:$littlen";
my $big = uc($little);
print "big:$big";
$little = lc($big);
print "little:$littlen";
$big = "U$little";
print "big:$little";
$little = "l$big";
print "little:$littlen";
$big = ucfirst($little);
print "big:$littlen";
$little = lcfirst($big);
print "little:$bign";

上面的这个程序打印的结果如下所示：

hello
HELLO
hello
HELLo
hello
Hello
hello

落到代码里，这篇到这就结束了，脚本之家特为大家整理了好几篇文章，希望以后大家多多兼容脚本之家。

您可能感兴趣的文章:

• Windows10下安装设置 perl 环境的详细教程
• Redis中3种特殊的数据类型（BitMap、Geo和HyperLogLog）
• Perl 和 StrawberryPerl 与 ActivePerl 的区别详解