Perl 正則表達式

正則表達式(regular expression)描述了一種字元串匹配的模式，可以用來檢查一個串是否含有某種子串、將匹配的子串做替換或者從某個串中取出符合某個條件的子串等。

Perl語言的正則表達式功能非常強大，基本上是常用語言中最強大的，很多語言設計正則式支持的時候都參考Perl的正則表達式。

Perl的正則表達式的三種形式，分別是匹配，替換和轉化:

• 匹配：m//（還可以簡寫為//，略去m）

• 替換：s///

• 轉化：tr///

這三種形式一般都和 =~ 或 !~ 搭配使用， =~ 表示相匹配，!~ 表示不匹配。

匹配操作符

匹配操作符 m// 用於匹配一個字元串語句或者一個正則表達式，例如，要匹配 標量 $bar 中的 "run",代碼如下所示：

實例

#!/usr/bin/perl$bar = "I am runoob site. welcome to runoob site.";if($bar =~ /run/){print"第一次匹配
";}else{print"第一次不匹配
";}$bar = "run";if($bar =~ /run/){print"第二次匹配
";}else{print"第二次不匹配
";}

執行以上程序，輸出結果為：

第一次匹配第二次匹配

模式匹配修飾符

模式匹配有一些常用的修飾符，如下表所示：

正則表達式變數

perl處理完後會給匹配到的值存在三個特殊變數名:

• $`:匹配部分的前一部分字元串

• $&:匹配的字元串

• $":還沒有匹配的剩餘字元串

如果將這三個變數放在一起,你將得到原始字元串。

實例如下：

實例

#!/usr/bin/perl$string = "welcome to runoob site.";$string =~ m/run/;print"匹配前的字元串: $`
";print"匹配的字元串: $&
";print"匹配後的字元串: $"
";

執行以上程序輸出結果為：

匹配前的字元串: welcome to
匹配的字元串: run匹配後的字元串: oob site.

替換操作符

替換操作符 s/// 是匹配操作符的擴展，使用新的字元串替換指定的字元串。基本格式如下：

s/PATTERN/REPLACEMENT/;

PATTERN 為匹配模式，REPLACEMENT 為替換的字元串。

例如我們將以下字元串的 "google" 替換為 "runoob":

實例

#!/usr/bin/perl$string = "welcome to google site.";$string =~ s/google/runoob/;
print"$string
";

執行以上程序輸出結果為：

welcome to runoob site.

替換操作修飾符

替換操作修飾符如下表所示：

轉化操作符

以下是轉化操作符相關的修飾符：

以下實例將變數 $string 中的所有小寫字母轉化為大寫字母：

#!/usr/bin/perl $string = "welcome to runoob site.";$string =~ tr/a-z/A-z/;print "$string
";

執行以上程序輸出結果為：

WELCOME TO RUNOOB SITE.

以下實例使用 /s 將變數 $string 重複的字元刪除：

實例

#!/usr/bin/perl$string = "runoob";$string =~ tr/a-z/a-z/s;
print"$string
";

執行以上程序輸出結果為：

runob

更多實例：

$string =~ tr/d/ /c; # 把所有非數字字元替換為空格$string =~ tr/ //d; # 刪除tab和空格$string =~ tr/0-9/ /cs # 把數字間的其它字元替換為一個空格。

更多正則表達式規則

喜歡這篇文章嗎？立刻分享出去讓更多人知道吧！