本文和大家重點討論一下Perl正則表達式的三種形式，Perl正則表達式的三種形式分別是匹配，替換和轉化，這三種形式一般都和=~或!~搭配使用。

Perl正則表達式

Perl正則表達式的三種形式

　　首先我們應該知道Perl程序中，Perl正則表達式有三種存在形式，他們分別是：

　　◆匹配：m/<regexp>/（還可以簡寫為/<regexp>/，略去m）

　　◆替換：s/<pattern>/<replacement>/

　　◆轉化：tr/<pattern>/<replacemnt>/

　　這三種形式一般都和=~或!~搭配使用（其中"=~"表示相匹配，在整條語句中讀作does，"!~"表示不匹配，在整條語句中讀作doesn't），并在左側有待處理的標量變量。如果沒有該變量和=~!~操作符，則默認為處理$_變量中的內容。舉例如下：

　　$str="IlovePerl";

　　$str=~m/Perl/;#表示如果在$str中發現"Perl"字符串，則返回"1"否則返回"0"。

　　$str=~s/Perl/BASH/;#表示將變量$str中的"Perl"字符串替換為"BASH"，如果發生此替換則返回"1"，否則返回"0"。

　　$str!~tr/A-Z/a-z/;#表示將變量$str中的所有大寫字母轉化為小寫字母，如果轉化發生了則返回"0"，否則返回"1"。

　　另外還有：

　　foreach(@array){s/a/b/;}#此處每次循環將從@array數組中取出一個元素存放在$_變量中，并對$_進行替換處理。

　　while(<FILE>){printif(m/error/);}#這一句稍微復雜一些，他將打印FILE文件中所有包含error字符串的行。

　　Perl的Perl正則表達式中如果出現()，則發生匹配或替換后()內的模式被Perl解釋器自動依次賦給系統$1,$2......請看下面的例子：

　　$string="Iloveperl";

本篇文章來自<A>IDC專家網</a>原文鏈接：http://www.soidc.net/articles/1215484853295/20071007/1215945554643_1.html

【編輯推薦】

1. Perl正則表達式內容盤點
2. Perl文件句柄概念詳解
3. 全面認識Perl正則表達式使用
4. 解析Perl正則表達式中的模式
5. Perl基礎 解析Perl標量和數組概念