大写字母和小写字母的转换:
函数uc()将所有小写字母转换为大写;
函数lc()将所有大写字母转换为小写;
Perl 提供了四个内置函数类来轻松更改字符和单词的大小写。 函数 uc() 将以大写形式返回其所有参数,而 lc() 将以小写形式返回其参数。 如果未指定参数,uc() 和 lc() 都将对 $_ 变量进行操作。
要更改单词第一个字母的大小写,请使用 () 和 ()。 与 uc() 和 lc() 类似,如果没有指定参数,() 和 () 将对 $_ 变量进行操作。
这四个函数都不会改变它的参数; 他们只是返回其参数的副本(经过修改)。 因此,您必须将结果分配给变量或打印它,或者以其他方式使用返回值。 这样做是一个常见的错误:
$a = '你好';
uc($a);
打印$a;
乍一看,您可能希望这段代码打印“HELLO”。 然而,由于 uc() 没有改变它的参数,它的结果只是以小写形式打印“hello”。 要获得预期结果,请使用如下代码:
$a = '你好';
$a = uc($a);
打印$a;
更改单词大小写的另一种方法是对用双引号引起来的字符串使用 /L 和 /U 转义序列。 使用以下代码可以获得与之前相同的结果:
$a = '你好';
打印“/U$a/E”;
转义字符 /E 结束前一个转义字符(在本例中为 /U)开始的内容。
使用 Perl 内置的大写和小写函数以及双引号内的转义字符 /U 和 /L 可以轻松更改大小写。
将单词的第一个字母大写
$str =~ s/(\w+)/\u$1/
在perl中,我们可以通过uc、lc、\U、\L来修改变量的大小写。 其中uc和\U将变量中的所有字母转换为大写,对应的lc和\L将变量中的所有字母转换为小写。 如果我们只想将变量的首字母大写或小写,可以使用perl提供的另外两个函数and来实现。 我们来看一个具体的例子:
#!/usr/bin/perl
使用 ;
使用 ;
我的$ =“你好”;
打印“:$\n”;
我的 $big = uc($);
打印“大:$大”;
$ = lc($大);
打印“:$\n”;
$大=“\U$”;
打印“大:$”;
$ = "\l$大";
打印“:$\n”;
$大=($);
打印“大:$\n”;
$ = ($大);
打印“:$大\n”;
上面的程序打印出以下结果:
你好
你好
你好
你好
你好
你好
你好