perl uc,lc,ucfirst,lcfirst大小写转换函数
大小写字母转换: 函数 函数 Perl提供了四个内置的函数类,从而能够轻松地改变字符和字的大小写。函数uc()会用大写返回其所有的参数,而lc()会用小写返回其参数。如果没有指定参数的话,uc()和lc()都会对$_变量进行操作。 这四个函数都不会改变其参数;它们只是会返回其参数的副本,而这个副本经过了改变。所以,你必须将结果分派给一个变量或者打印它,或者用其他的方式使用返回的值。像下面这样做是一个常见的错误: $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 这篇到这就结束了,编程小技巧小编特为大家整理了好几篇文章,希望以后大家多多支持编程小技巧。 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |