新人求教---正则表达式匹配---结尾字符匹配

本帖最后由 justagain 于 2010-09-15 13:36 编辑

新人开始学习正则表达式，习题要求写出一段代码来匹配以a结尾的单词，然后截取a之后的n个字符（例如7个）并且输出。
参考例题和解答，做出了如下的答案。

while (<STDIN> ){
        chomp;
        if (/(\b\w*a\b)/){
        print "Matched: |$`<$&>$'|\n";
} else {
        print "No match: |$_|\n";
        }

但是这样只是做到输出以a结尾的单词，无法做到题目要求的截取随后的字符。
习题答案给出了如下的回答，可惜我看不懂。
m!
(\b\w*a\b)
(.{0,5}
!xs

大家能否帮我解答疑惑？ 谢谢。

另外，我觉得既然要求以a结尾就可以，是不是可以简单地用 /a\b/来进行匹配。
如果希望papa&momo这个词不被匹配，应该如何改写代码？ （因为这个字符串以o结尾了）

m!
(\b\w*a\b)
(.{0,5}
!xs
跟m/(\b\w*a\b)(.{0,7})/xs一样，匹配一个单词用\b\w*\b

答案里面好像少了一个括号

本帖最后由 justagain 于 2010-09-15 15:04 编辑

回复 yybmsrs

恩，理解了，但是如何只是输入后接的7个字符呢？

我自己想出来了，需要在输出的时候补上$2的代码。

整个代码可以用

if (m/(\b\w*a\b)(.{0,5}) / xs){   
        print "$1 $2\n";              
}

万分感谢。