新手求助：正则表达式匹配N位数字

homme1986

今天刚学了regex,想写个正则可以匹配任何含有N位数字的字符串，并输出不符合的字符串数

e.g: file.txt 里有下面这几句话
Look20 at the8 desk.
The 5678door is closed.
Have you seen them?
They are not here123.


如果是需要3位数字，只输出最后一句，按我的理解写的script

#!/usr/bin/perl
use warnings;
use strict;
open my $file, '<', @ARGV;
my $nomatch = 0;
while(<>
{  if (/\d{3}/)
    { print "$_\n"; }
    else
    { $nomatch++; }
}
print "$nomatch lines did not match.\n";
exit;

但是结果连第二句也输出了，这里正则该如何写呢？
本人初学，高手们不要见笑哈^_^

[ 本帖最后由 homme1986 于 2008-9-4 11:01 编辑 ]

pooronce

第二句，5678不就是3位数字么，两组“3位数字”了

homme1986

的确是两组，但是能不能把类似的这种情况排除呢？我只想要3位的...

pooronce

/[^\d]\d{3}[^\d]/
再试试

homme1986

谢谢楼上的朋友，学习了
再请教下如果想得到不含数字的字符串，象例子的第3句话，正则如何写？

pooronce

/^[^\d]*$/

似乎是个笨方法，不知道有没有好点的方法

homme1986

Thanks!!

cobrawgl

原帖由 pooronce 于 2008-9-4 11:16 发表
/[^\d]\d{3}[^\d]/
再试试

这样是不合适的

/\b\d{3}\b/

ly5066113

原帖由 pooronce 于 2008-9-4 11:45 发表
/^[^\d]*$/

似乎是个笨方法，不知道有没有好点的方法

! /\d/

cobrawgl

原帖由 ly5066113 于 2008-9-4 14:18 发表


! /\d/

\D