perl正则表达式教程

《perl正则表达式教程》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、PERL里正则表达式的简介1、简介模式指在字符串中寻找的特定序列的字符，由反斜线包含：/def/即模式def。其用法如结合函数split将字符串用某模式分成多个单词：@array=split(//,$line);2、匹配操作符=~、!~=~检验匹配是否成功：$result=$var=~/abc/;若在该字符串中找到了该模式，则返回非零值，即true，不匹配则返回0，即false。!~则相反。这两个操作符适于条件控制中，如：if($question=~/please/){print("Thankyoufor

2、beingpolite!");}else{print("Thatwasnotverypolite!");}3、模式中的特殊字符PERL在模式中支持一些特殊字符，可以起到一些特殊的作用。3.1字符++意味着一个或多个相同的字符，如：/de+f/指def、deef、deeeeef等。它尽量匹配尽可能多的相同字符，如/ab+/在字符串abbc中匹配的将是abb，而不是ab。当一行中各单词间的空格多于一个时，可以如下分割：@array=split(/+/,$line);注：split函数每次遇到分割模式，

3、总是开始一个新单词，因此若$line以空格打头，则@array的第一个元素即为空元素。但其可以区分是否真有单词，如若$line中只有空格，则@array则为空数组。且上例中TAB字符被当作一个单词。注意修正。3.2字符[]和[^][]意味着匹配一组字符中的一个，如/a[0123456789]c/将匹配a加数字加c的字符串。与+联合使用例：/d[eE]+f/匹配def、dEf、deef、dEdf、dEEEeeeEef等。^表示除其之外的所有字符，如：/d[^deE]f/匹配d加非e字符加f的字符串。3.3字

4、符*和?它们与+类似，区别在于*匹配0个、1个或多个相同字符，?匹配0个或1个该字符。如/de*f/匹配df、def、deeeef等；/de?f/匹配df或def。3.4转义字符如果你想在模式中包含通常被看作特殊意义的字符，须在其前加斜线""。如：/*+/中*即表示字符*，而不是上面提到的一个或多个字符的含义。斜线的表示为/\/。在PERL5中可用字符对Q和E来转义。3.5匹配任意字母或数字上面提到模式/a[0123456789]c/匹配字母a加任意数字加c的字符串，另一种表示方法为：/a[0

5、-9]c/，类似的，[a-z]表示任意小写字母，[A-Z]表示任意大写字母。任意大小写字母、数字的表示方法为：/[0-9a-zA-Z]/。3.6锚模式锚描述^或A仅匹配串首$或Z仅匹配串尾b匹配单词边界B单词内部匹配例1：/^def/只匹配以def打头的字符串，/$def/只匹配以def结尾的字符串，结合起来的/^def$/只匹配字符串def(?)。A和Z在多行匹配时与^和$不同。例2：检验变量名的类型：if($varname=~/^$[A-Za-z][_0-9a-zA-Z]*$/){pri

6、nt("$varnameisalegalscalarvariable");}elsif($varname=~/^@[A-Za-z][_0-9a-zA-Z]*$/){print("$varnameisalegalarrayvariable");}elsif($varname=~/^[A-Za-z][_0-9a-zA-Z]*$/){print("$varnameisalegalfilevariable");}else{print("Idontunderstandwhat$varnameis."

7、);}例3：b在单词边界匹配：/bdef/匹配def和defghi等以def打头的单词，但不匹配abcdef。/defb/匹配def和abcdef等以def结尾的单词，但不匹配defghi，/bdefb/只匹配字符串def。注意：/bdef/可匹配$defghi，因为$并不被看作是单词的部分。例4：B在单词内部匹配：/Bdef/匹配abcdef等，但不匹配def；/defB/匹配defghi等；/BdefB/匹配cdefg、abcdefghi等，但不匹配def,defghi,abcd

8、ef。3.7模式中的变量替换将句子分成单词：$pattern="[\t]+";@words=split(/$pattern/,$line);3.8字符范围转义E转义字符描述范围d任意数字[0-9]D除数字外的任意字符[^0-9]w任意单词字符[_0-9a-zA-Z]W任意非单词字符[^_0-9a-zA-Z]s空白[rtf]S非空白[^rtf]例：/[da-z]/匹配任意数字或小写字母。3.9