正则表达式进行匹配.ppt

Perl Perl 语言语言 1 LOGO 第八章用正则表达式进行匹配用 m// 进行匹配 1模式匹配修饰符 2锚位 3 ※※2 △△捕获变量 4 △△ LOGO ?现在你将学****怎样在Perl 中使用正则表达式。 3 LOGO 使用 m// 匹配?我们曾经将模式放在一对正斜线( //)里面,如/fred/ 。?实际上是 m// (模式匹配)的一种简写。同 qw// 。?也可以使用 m(fred ), m<fred >, m{fred }, m[fred ],或者 m,fred ,, m!fred !, m^fred ^。?如果使用//,可以省略 m 4 LOGO 使用 m// 匹配?建议:使用模式中不会出现的字符作为分隔符。?/http:\/\/ / #匹配 http:// 。?明智的选择: m%^http:// %更易于阅读,书写, 维护,以及调试。 5 LOGO 模式匹配修饰符?修饰符(modifier) ,通常叫做标记(flag) ,可以后缀在正则表达式后面来改变其默认的行为。?: /i ?要创建一个大小写无关的模式,如匹配 FRED 时, 也能匹配上 fred, Fred ,可以使用修饰符/i: 6 print “ Would you like to play a game? ”; chomp($_ = <STDIN>); if(/ yes /i ) { #大小写无关 print “ In that case, I mend that you go bowling.\n ”; } LOGO 模式匹配修饰符?: /s ?点(.) 不匹配换行符,如果希望点(.) 能匹配任意字符(包括换行符),可以使用/s修饰符。?此时(.) 相当于[\d\D] 7 $_ = “ I saw Barney \ndown at the bowing alley\nwith Fred \nlast night.\n ”; if( /Barney. * Fred/s ){ print “ That string mentions Fred after Barney!\n ”; } LOGO 模式匹配修饰符?: /x ?允许你在模式中加入任何数量的空白,以方便阅读: 8 /-?\d+\.?\d * / #这是什么含义? / -? \d+ \.? \d * /x #要好些由于/x 允许模式中使用空白,原来模式中的空格,制表符等将被忽略。可以使用\s(\s *或\s+) 。$_= “ 4 4 ”/ \d \d/x #错误/ \d \s+ \d/x #成功 LOGO 模式匹配修饰符?Perl 中,注释可以被作为空白,因此使用/x,可以在模式中加上注释: 9 / -? #可选的负号 \d+ #小数点前一个或多个十进制数字 \.? #可选的小数点 \d *#小数点后一些可选的十进制数字/x #模式结束 LOGO 模式匹配修饰符?如果需要匹配井号,可以使用\#或[#] 10 / [0-9]+ #必须出现一个或多个数字[#]+ #井号字符本身/x #模式结束/ -? #有减号/没有减号---------- 错误,使用了定界符 [0-9]+ #必须出现一个或多个数字 [#]+ #井号字符本身/x #模式结束注释部分不能出现定界符号,否则被视为模式终点。