下面請看本文詳細介紹.

Perl字符串處理函數

1. index

語法:
position=index(string,substring,position);
語義:
返回子串substring在字符串string中的位置,如果不存在則返回-1。
參數position是可選項,表示匹配之前跳過的字符數,或者說從該位置開始匹配。

2. rindex
語法:
position=rindex(string,substring,position);
語義:
與index類似，區別是從右端匹配。

3. length
語法:
num=length(string);
語義:
返回字符串長度，或者說含有字符的數目。

4. pos
語法:
offset=pos(string);
語義:
返回最后一次模式匹配的位置。

5.substr
語法:
substr(expr,skipchars,length)
語義:
抽取字符串(或表達式生成的字符串)expr中的子串,
跳過skipchars個字符,或者說從位置skipchars開始抽取子串(第一個字符位置為0),
子串長度為length,此參數可忽略,意味著取剩下的全部字符。
當此函數出現在等式左邊時,expr必須為變量或數組元素,此時其中部分子串被等式右邊的值替換。

6.study
語法:
study(scalar);
語義:
用一種內部格式提高變量的訪問速度，同一時刻只對一個變量起作用。

7. lc, uc
語法:
retval=lc(string);
retval=uc(string);
語義:
將字符串全部轉換成小/大寫字母。

8. lcfirst, ucfirst
語法:
retval=lcfirst(string);
retval=ucfirst(string);
語義:
將第一個字母轉換成小/大寫。

9. quotameta
語法:
newstring=quotemeta(oldstring);
語義:
將非單詞的字母前面加上反斜線(\)。

語句：$string=quotemeta($string);
等效于：$string=~s/(\W)/\\$1/g;
常用于模式匹配操作中，確保字符串中沒有字符被看作匹配操作符。

10. join
語法:
join(joinstr,list);
語義:
把字符串列表(數組)組合成一個長的字符串，在每兩個列表元素間插入串joinstr。

11. 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