使用Perl风格的regexp,是否可以查找某些不是特定模式的内容?
例如,[^abc]
查找单个字符,而不是a
、b
或c
。
但是我可以指定比单个字符更长的内容吗?
例如,在下面的字符串中,我想搜索第一个不是顶级域名且不包含大写字母的单词,或者可能是一些更复杂的规则,如3-10个字符。在我的示例中,它应该是"abcd"
net com org edu ABCE abcdefghijklmnoparacbasd abcd
发布于 2010-12-08 19:33:06
您可以使用负面的前瞻断言来完成此操作,如下所示:
^(?!(?:net|com|org|edu)$)(?!.*[A-Z])[a-z]{3,10}$
解释:
^ - Start anchor
$ - End anchor
(?:net|com|org|edu) - Alternation, matches net or com or org or edu
(?!regex) - Negative lookahead.
Matches only if the string does not match the regex.
因此,部件(?!(?:net|com|org|edu)$)
确保输入不是顶级域之一。
part (?!.*[A-Z])
确保输入没有大写字母。
部件[a-z]{3,10}$
确保输入的长度至少为3,最多为10。
发布于 2010-12-08 19:40:11
只需使用“不匹配”运算符:!~
所以只需创建您的表达式,然后看到一个变量与它不匹配:
if ($var !~ /abc/) {
...
}
发布于 2010-12-08 19:41:37
我希望用regexp做一些匹配和用perl做一些检查更容易。
#!/usr/bin/env perl
use strict;
use warnings;
my $s = "net com org edu ABCE abcdefghijklmnoparacbasd abcd";
# loop short words (a-z might not be what you want though)
foreach( $s =~ /(\b[a-z]{3,10}\b)/g ){
print $_, "\n" if is_tpl($_);
}
顺便说一句,有很多顶级域名..
https://stackoverflow.com/questions/4386856
复制相似问题