+ -
当前位置:首页 → 问答吧 → 请教一个perl正则表达式的问题

请教一个perl正则表达式的问题

时间:2010-11-15

来源:互联网

我们知道,要匹配所有.a, .so的文件可以用:
m/.*(\.a|\.so)$/

那如果要匹配所有不是.a, .so的文件,用一个正则表达式该怎么表示?
google了半天,摸不着头脑!

急!在线等~~~~~

谢谢了啊!

作者: xiaolorna   发布时间: 2010-11-15

把=~换成!~。
另外你这个正则表达式写的不是很好,可以改成:/\.(a|so)$/

作者: iambic   发布时间: 2010-11-15

ding

作者: clmm88888   发布时间: 2010-11-15

谢谢你的及时回答,但是,我的情况是,m//里面的表达式会被传到另外一个脚本里,这个另外的脚本我是不能改的,所以没有办法使用 !~ 所以我想问,有没有类似^在[^a-z]里面的所用的特殊字符可以实现。

我之所以写成m/.*(\.a|\.so)$/, 是因为我想在这个基础上稍微修改一下,我的文件名不一定都有\. ,可能就是个光秃秃的 abc

> ls -1 test
abc
abc.a
abc.so
abc.so.1
abc.att

谢谢~~~~~~~~~~~~~~

作者: xiaolorna   发布时间: 2010-11-15

/.*(\.a|\.so)$/和/\.(a|so)$/是等价的。/.*(\.a|\.so)$/匹配不了abc,/\.(a|so)$/也不能匹配。

作者: iambic   发布时间: 2010-11-15

你说的那个试下这个:
Perl code
/\.(?!(a|abc)$)[^.]+$|^[^.]+$/

如果不相匹配abc的话就:
Perl code
/\.(?!(a|abc)$)[^.]+$/

作者: iambic   发布时间: 2010-11-15