编程知识 购物 网址 新闻 笑话 | 软件 日历 阅读 图书馆 China
TxT小说阅读器
↓语音阅读,小说下载,古典文学↓
图片批量下载器
↓批量下载图片,美女图库↓
图片自动播放器
↓图片自动播放器↓
一键清除垃圾
↓轻轻一点,清除系统垃圾↓
vbs/VBScript DOS/BAT hta htc python perl 游戏相关 VBA 远程脚本 ColdFusion ruby专题 autoit seraphzone PowerShell linux shell Lua Golang Erlang 其它教程 CSS/HTML/Xhtml html5 CSS XML/XSLT Dreamweaver教程 经验交流
站长资讯 .NET新手 ASP.NET C# WinForm Silverlight WCF CLR WPF XNA VisualStudio ASP.NET-MVC .NET控件开发 EntityFramework WinRT-Metro Java C++ PHP Delphi Python Ruby C语言 Erlang Go Swift Scala R语言 Verilog 其它语言 架构设计 面向对象 设计模式 领域驱动 Html-Css JavaScript jQuery HTML5 SharePoint GIS技术 SAP OracleERP DynamicsCRM K2 BPM 信息安全 企业信息 Android开发 iOS开发 WindowsPhone WindowsMobile 其他手机 敏捷开发 项目管理 软件工程 SQLServer Oracle MySQL NoSQL 其它数据库 Windows7 WindowsServer Linux
   -> perl -> perl uc,lc,ucfirst,lcfirst大小写转换函数 -> 正文阅读

[perl]perl uc,lc,ucfirst,lcfirst大小写转换函数

这篇文章主要介绍了perl 大小写字母转换函数,需要的朋友可以参考下
大小写字母转换:
函数 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:$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
这篇到这就结束了,脚本之家小编特为大家整理了好几篇文章,希望以后大家多多支持脚本之家。
  perl 最新文章
强大的Perl正则表达式实例详解
Perl中常见符号与操作
Perl中的特殊符号介绍
Perl中的符号 ->;、=>; 和 :: 分别表
perl uc,lc,ucfirst,lcfirst大小写转换函数
Perl学习教程之单行命令详解
perl与shell获取昨天、明天或多天前的日期的
perl中5个常见错误
Perl的Mail::POP3Client模块和Gmail通信实例
perl处理xml的模块介绍
上一篇文章      下一篇文章      查看所有文章
加:2017-10-26 23:21:51  更:2017-10-26 23:21:53 
 
360图书馆 软件开发资料 购物精选 新闻资讯 Chinese Culture 三丰软件 开发 中国文化 阅读网 日历 万年历 2019年12日历
2019-12-16 0:21:17
多播视频美女直播
↓电视,电影,美女直播,迅雷资源↓
TxT小说阅读器
↓语音阅读,小说下载,古典文学↓
一键清除垃圾
↓轻轻一点,清除系统垃圾↓
图片批量下载器
↓批量下载图片,美女图库↓
  网站联系: qq:121756557 email:121756557@qq.com  编程知识