Perl字符串处理函数用法集锦

Perl字符串处理函数

0.函数名 index

调用语法position=index(string,substring,position);

解说返回子串substring在字符串string中的位置,如果不存在则返回-1。参数position

是可选项,表示匹配之前跳过的字符数,或者说从该位置开始匹配。

1.函数名 rindex

调用语法position=rindex(string,substring,position);

解说与index类似,区别是从右端匹配。

2.函数名 length

调用语法num=length(string);

解说返回字符串长度,或者说含有字符的数目。

3.函数名 pos

调用语法offset=pos(string);

解说返回最后一次模式匹配的位置。

4.函数名 substr

调用语法substr(expr,skipchars,length)

解说抽取字符串(或表达式生成的字符串)expr中的子串,跳过skipchars个字符,或者

说从位置skipchars开始抽取子串(第一个字符位置为0),子串长度为length,此参数可

忽略,意味着取剩下的全部字符。

当此函数出现在等式左边时,expr必须为变量或数组元素,此时其中部分子串被等式右边

的值替换。

5.函数名 study

调用语法study(scalar);

解说用一种内部格式提高变量的访问速度,同一时刻只对一个变量起作用。

6.函数名 lc,uc

调用语法retval=lc(string);

retval=uc(string);

解说将字符串全部转换成小/大写字母。

7.函数名 lcfirst,ucfirst

调用语法retval=lcfirst(string);

retval=ucfirst(string);

解说将第一个字母转换成小/大写。

8.函数名 quotameta

调用语法newstring=quotemeta(oldstring);

解说将非单词的字母前面加上反斜线()。

语句:$string=quotemeta($string);

等效于:$string=~s/(W)/\$1/g;

常用于模式匹配操作中,确保字符串中没有字符被看作匹配操作符。

9.函数名 join

调用语法join(joinstr,list);

解说把字符串列表(数组)组合成一个长的字符串,在每两个列表元素间插入串joinstr。

10.函数名 sprintf

调用语法sprintf(string,fields);

解说与printf类似,区别是结果不输出到文件,而作为返回值赋给变量。

例子$num=26;

$outstr=sprintf("%d=%xhexadecimalor%ooctaln",$num,$num,$num);

print($outstr);

结果输出26=1ahexadecimalor32octal

参考:http://blog.sina.com.cn/s/blog_725dfbd90101go32.html