符串处理函数

 

perl 字符串处理函数，转

三、字符串处理函数 函数名 index 调用语法 position = index (string, substring, position); 解说 返回子串substring在字符串string中的位置，如果不存在则返回-1。参数position是可选项，表示匹配之前跳过的字符数，或者说从该位置开始匹配。 函数名 rindex 调用语法 position = rindex (string, substring, position); 解说 与index类似，区别是从右端匹配。 函数名 length 调用语法 num = length (string); 解说 返回字符串长度，或者说含有字符的数目。 函数名 pos 调用语法 offset = pos(string); 解说 返回最后一次模式匹配的位置。 函数名 substr 调用语法 substr (expr, skipchars, length) 解说 抽取字符串（或表达式生成的字符串）expr中的子串，跳过skipchars个字符，或者说从位置skipchars开始抽取子串（第一个字符位置为0），子串长度为length，此参数可忽略，意味着取剩下的全部字符。 当此函数出现在等式左边时，expr必须为变量或数组元素，此时其中部分子串被等式右边的值替换。 函数名 study 调用语法 study (scalar); 解说 用一种内部格式提高变量的访问速度，同一时刻只对一个变量起作用。 函数名 lc uc 调用语法 retval = lc(string); retval = uc(string); 解说 将字符串全部转换成小/大写字母。 函数名 lcfirst ucfirst 调用语法 retval = lcfirst(string); retval = ucfirst(string); 解说 将第一个字母转换成小/大写。 函数名 quotameta 调用语法 newstring = quotemeta(oldstring); 解说 将非单词的字母前面加上反斜线(/)。 语句 ： $string = quotemeta($string); 等效于：$string =~ s/(/W)///$1/g; 常用于模式匹配操作中，确保字符串中没有字符被看作匹配操作符。 函数名 join 调用语法 join (joinstr, list); 解说 把字符串列表(数组)组合成一个长的字符串，在每两个列表元素间插入串joinstr。 函数名 sprintf 调用语法 sprintf (string, fields); 解说 与printf类似，区别是结果不输出到文件，而作为返回值赋给变量。 例子 $num = 26; $outstr = sprintf("%d = %x hexadecimal or %o octal/n",$num, $num, $num); print ($outstr); 结果输出 26 = 1a hexadecimal or 32 octal