一、簡介
模式指在字串中尋找的特定序列的字元,由反斜線包含:/def/即模式def。其用法如結合函式split將字串用某模式分成多個單詞:@array = split(/ /, $line);
二、匹配操作
匹配操作符 =~、!~
=~檢驗匹配是否成功:$result = $var =~ /abc/;若在該字串中找到了該模式,則返回非零值,即true,不匹配則返回0,即false。!~則相反。
這兩個操作符適於條件控制中,如:
if ($question =~ /please/)
else
三、模式中的特殊字元
perl在模式中支援一些特殊字元,可以起到一些特殊的作用。
1、字元
意味著乙個或多個相同的字元,如:/de f/指def、deef、deeeeef等。它盡量匹配盡可能多的相同字元,如/ab /在字串abbc中匹配的將是abb,而不是ab。
當一行中各單詞間的空格多於乙個時,可以如下分割:
@array = split (/ /, $line);
注:split函式每次遇到分割模式,總是開始乙個新單詞,因此若$line以空格打頭,則@array的第乙個元素即為空元素。但其可以區分是否真有單詞,如若$line中只有空格,則@array則為空陣列。且上例中tab字元被當作乙個單詞。注意修正。
2、字元 和[^]
意味著匹配一組字元中的乙個,如/a[0123456789]c/將匹配a加數字加c的字串。與 聯合使用例:/d[ee] f/匹配def、def、deef、dedf、deeeeeeeef等。^表示除其之外的所有字元,如:/d[^dee]f/匹配d加非e字元加f的字元 串。
3、字元 *和?
它們與 類似,區別在於*匹配0個、1個或多個相同字元,?匹配0個或1個該字元,+告訴引擎匹配前導字元1次或多次。如/de*f/匹配df、def、deeeef等;/de?f/匹配df或def。
4、轉義字元
如果你想在模式中包含通常被看作特殊意義的字元,須在其前加斜線"\"。如:/\* /中\*即表示字元*,而不是上面提到的乙個或多個字元的含義。斜線的表示為/\\/。在perl5中可用字元對\q和\e來轉義。
5、匹配任意字母或數字
上面提到模式/a[0123456789]c/匹配字母a加任意數字加c的字串,另一種表示方法為:/a[0-9]c/,類似的,[a-z]表示任意小寫字母,[a-z]表示任意大寫字母。任意大小寫字母、數字的表示方法為:/[0-9a-za-z]/。
6、錨模式
錨 描述
^ 或 \a 僅匹配串首
$ 或 \z 僅匹配串尾
\b 匹配單詞邊界
\b 單詞內部匹配
例1:/^def/只匹配以def打頭的字串,/$def/只匹配以def結尾的字串,結合起來的/^def$/只匹配字串def(?)。\a和\z在多行匹配時與^和$不同。
例2:檢驗變數名的型別:
if ($varname =~ /^\$[a-za-z][_0-9a-za-z]*$/) elsif ($varname =~ /^@[a-za-z][_0-9a-za-z]*$/) elsif ($varname =~ /^[a-za-z][_0-9a-za-z]*$/) else
例 3:\b在單詞邊界匹配:/\bdef/匹配def和defghi等以def打頭的單詞,但不匹配abcdef。/def\b/匹配def和 abcdef等以def結尾的單詞,但不匹配defghi,/\bdef\b/只匹配字串def。注意:/\bdef/可匹配$defghi,因為$並 不被看作是單詞的部分。
例4:\b在單詞內部匹配:/\bdef/匹配abcdef等,但不匹配def;/def\b/匹配defghi等;/\bdef\b/匹配cdefg、abcdefghi等,但不匹配def,defghi,abcdef。
7、模式中的變數替換
將句子分成單詞:
$pattern = "[\\t ] ";
@words = split(/$pattern/, $line);
8、字元範圍轉義
e 轉義字元 描述 範圍
\d 任意數字 [0-9]
\d 除數字外的任意字元 [^0-9]
\w 任意單詞字元 [_0-9a-za-z]
\w 任意非單詞字元 [^_0-9a-za-z]
\s 空白 [ \r\t\n\f]
\s 非空白 [^ \r\t\n\f]
例:/[\da-z]/匹配任意數字或小寫字母。
9、匹配任意字元
字元"."匹配除換行外的所有字元,通常與*合用。
10、匹配指定數目的字元
字元對{}指定所匹配字元的出現次數。如:/def/匹配def,deef和deeef;/def/匹配deeef;/def/匹配不少於3個e在d和f之間;/def/匹配不多於3個e在d和f之間。
11、指定選項
字元"|"指定兩個或多個選擇來匹配模式。如:/def|ghi/匹配def或ghi。
例:檢驗數字表示合法性
if ($number =~ /^-?\d $|^-?0[xx][\da-fa-f] $/) else
其中 ^-?\d $ 匹配十進位制數字,^-?0[xx][\da-fa-f] $ 匹配十六進製制數字。
12、模式的部分重用
當模式中匹配相同的部分出現多次時,可用括號括起來,後面用\n來多次引用,以簡化表示式:
/\d([\w])\d\1\d/ 匹配:
12-05-92
26.11.87
07 04 92等
注意:/\d([\w])\d\1\d/ 不同於/(\d)([\w])\1\2\1/ ,後者只匹配形如17-17-17的字串,而不匹配17-05-91等。
在/\d([\w])\d\1\d/中,\1代表}([\w]), 而在/(\d)([\w])\1\2\1/中,\1代表(\d),\2代表([\w])。
13、轉義和特定字元的執行次序
象操作符一樣,轉義和特定字元也有執行次序:
特殊字元 描述
() 模式記憶體 ,可以在後面使用\n來使用。
* ? {} 出現次數
^ $ \b \b 錨
| 選項
14、指定模式定界符
預設的,模式定界符為反斜線/,但其可用字母m自行指定,如:
m!/u/jqpublic/perl/prog1! 等價於/\/u\/jqpublic\/perl\/prog1/
注:當用字母作為定界符時,不做變數替換;當用特殊字元作為定界符時,其轉義功能或特殊功能即不能使用。
15、模式次序變數
在模式匹配後呼叫重用部分的結果可用變數$n,全部的結果用變數$&。
$string = "this string contains the number 25.11.";
$string =~ /-?(\d )\.?(\d )/; # 匹配結果為25.11
$integerpart = $1; # now $integerpart = 25
$decimalpart = $2; # now $decimalpart = 11
$totalpart = $&; # now totalpart = 25.11
例項:$lastlabel =~ /$labelletter((\d\d\d)(\.\d\d\d)?)([a-z]?)/i
# ex: for 031.100a
# $1 = 031.100, $2 = 031, $3 = .100, $4 = a
四、模式匹配選項
選項 描述
g 匹配所有可能的模式
i 忽略大小寫
m 將串視為多行
o 只賦值一次
s 將串視為單行
x 忽略模式中的空白
1、匹配所有可能的模式(g選項)
@matches = "balata" =~ /.a/g; # now @matches = ("ba", "la", "ta")
匹配的迴圈:
while ("balata" =~ /.a/g)
結果為:
bala
ta當使用了選項g時,可用函式pos來控制下次匹配的偏移:
$offset = pos($string);
pos($string) = $newoffset;
2、忽略大小寫(i選項)例
/de/i 匹配de,de,de和de。
3、將字串看作多行(m選項)
在此情況下,^符號匹配字串的起始或新的一行的起始;$符號匹配任意行的末尾。
4、只執行一次變數替換例
$var = 1;
$line = ;
while ($var < 10)
每次均匹配/1/。
5、將字串看作單行例
/a.*bc/s匹配字串a***xx \n***xbc,但/a.*bc/則不匹配該字串。
6、在模式中忽略空格
/\d ([\w]) \d \1 \d/x等價於/\d([\w])\d\1\d/。
五、替換操作符
語法為s/pattern/replacement/,其效果為將字串中與pattern匹配的部分換成replacement。如:
$string = "abc123def";
$string =~ s/123/456/; # now $string = "abc456def";
在替換部分可使用模式次序變數$n,如s/(\d )/[$1]/,但在替換部分不支援模式的特殊字元,如{},*, 等,如s/abc/[def]/將把abc替換為[def]。
替換操作符的選項如下表:
選項 描述
g 改變模式中的所有匹配
i 忽略模式中的大小寫
e 替換字串作為表示式
m 將待匹配串視為多行
o 僅賦值一次
s 將待匹配串視為單行
x 忽略模式中的空白
注:e選項把替換部分的字串看作表示式,在替換之前先計算其值,如:
$string = "0abc1";
$string =~ s/[a-za-z] /$& x 2/e; # now $string = "0abcabc1"
perl正則匹配
字元的種類是一定的,無非是空格,數字,大小寫字母,和perl中定義的元字元,還有本國語言。所以原則上任何格式的字元都能匹配。匹配工具 選擇符號,關鍵字,量詞,斷言,轉義字元 當出現多個字元組成的 非空格字元時候,例如123,45 3 s sdgg 則使用 0 9a za z 若加上 則只能匹配一行中...
Perl 正則匹配經驗記錄
0.正則匹配字典 1.重新定義字串分隔符為 2.perl 中 ms,msg,gms是什麼意思?正規表示式中,msg和 gms意思一樣。g表示找出字串中所有匹配的部分,如 x cat dog house words x w g 結果 word 0 cat word 1 dog word 2 house...
Perl 正則匹配 對分詞標註結果正則匹配
3 a 中文編碼 從資料夾讀檔案 問原文標記還是輸出歧義句子 寫檔案的時候每次檔案名字加一 之前有處理過分檔案 b 提取 w w w 之前的中文句子進行判斷 c 判斷分為幾個情況 含有 k 無操作 含有 ni 無操作 只要含有 d r c 有歧義 開頭含有 v u p 1 v u p 開頭含有 m ...