使用PERL-regex匹配“Wibble A,B,C2,D”

时间:2010-05-21 01:48:53

标签: regex preg-replace preg-match

  

...... Foo,Bar, Wibble A,B,C2,N,J, Baz,Qux,More,More,...

     

... Bar,Qux, Wibble D,E,J,N6,O, Foo,Foo,More,More,...等等

如何使用PERL兼容的正则表达式匹配这些字符串的突出显示部分?

以单词“Wibble”开头,并继续用逗号分隔的一个或两个字符组件,直到下一个单词。

4 个答案:

答案 0 :(得分:2)

据我所知,这可能适合你:

/Wibble( [A-Z]\d?,)*/

答案 1 :(得分:1)

/Wibble((?:\s+[A-Z0-9]{1,2},)*)/

检查$1

当然,当你说大写然后在你的例子中有数字时,必须有一些例外。

答案 2 :(得分:1)

我会尝试:

/(Wibble(?:\s[A-Z0-9]{1,2},)+)/

答案 3 :(得分:0)

并非严肃的回答:/(Wibble A, B, C2, N, J,)/