收藏本站 收藏本站
积木网首页 - 软件测试 - 常用手册 - 站长工具 - 技术社区
首页 > perl > 正文

首页 - PHP - 数据库 - 操作系统 - 游戏开发 - JS - Android - MySql - Redis - MongoDB - Win8 - Shell编程 - DOS命令 - jQuery - CSS样式 - Python - Perl

Access - Oracle - DB2 - SQLServer - MsSql2008 - MsSql2005 - Sqlite - PostgreSQL - node.js - extjs - JavaScript vbs - Powershell - Ruby

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

这篇到这就结束了,积木网小编特为大家整理了好几篇文章,希望以后大家多多支持积木网。

在Django框架中自定义模板过滤器的方法
自定义过滤器就是有一个或两个参数的Python函数:(输入)变量的值参数的值,可以是默认值或者完全留空例如,在过滤器{{var|foo:"bar"}}中,过滤器foo会被传

Perl图形化包管理工具PPM学习使用笔记
PPM(Programmer'sPackageManager)是ActivePerl自带的一个图形化管理工具,有了这个工具,要升级,更新,移除Perl的Package都非常方便。只需要输入ppm或者ppmgui就可

Perl初学笔记之Hello World
工作需要开始学Perl,下载个Window版(5.16)的:下载链接http://www.activestate.com/activeperl/downloads安装好了之后,写第一个perl程序#!/usr/bin/perlprint"Hello,World!n";运行

本周排行

更新排行

强悍的草根IT技术社区,这里应该有您想要的! 友情链接:b2b电子商务
Copyright © 2010 Gimoo.Net. All Rights Rreserved  京ICP备05050695号