perl uc,lc,ucfirst,lcfirst大小写转换函数（大小写转换汇编语言）全程干货

随心笔谈2年前发布编辑

214 0

🌐 经济型：买域名、轻量云服务器、用途：游戏网站等《腾讯云》特点：特价机便宜适合初学者用点我优惠购买

🚀 拓展型：买域名、轻量云服务器、用途：游戏网站等《阿里云》特点：中档服务器便宜域名备案事多点我优惠购买

🛡️ 稳定型：买域名、轻量云服务器、用途：游戏网站等《西部数码》特点：比上两家略贵但是稳定性超好事也少点我优惠购买

大小写字母转换：

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

函数 (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+)/ā/pre>

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

#! /usr/bin/perl
use 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

这篇到这就结束了，脚本之家小编特为大家整理了好几篇文章，希望以后大家多多支持脚本之家。

您可能感兴趣的文章:Windows10下安装配置 perl 环境的详细教程Redis中3种特殊的数据类型（BitMap、Geo和HyperLogLog）Perl 和 StrawberryPerl 与 ActivePerl 的区别详解