尽管去掉所有空白的答案很简洁，但它并没有真正解决所提出的问题，即找到一个正则表达式。以我的测试脚本为例，它下载一个网页并使用正则表达式提取所有电话号码。因为无论如何都需要正则表达式，所以不妨让正则表达式完成所有工作。我想到了这个:

1?\W*([2-9][0-8][0-9])\W*([2-9][0-9]{2})\W*([0-9]{4})(\se?x?t?(\d*))?

这里有一个perl脚本来测试它。当您匹配时，$1包含区号，$2和$3包含电话号码，$5包含分机。我的测试脚本从互联网上下载一个文件，并打印其中所有的电话号码。

#!/usr/bin/perl

my $us_phone_regex =
        '1?\W*([2-9][0-8][0-9])\W*([2-9][0-9]{2})\W*([0-9]{4})(\se?x?t?(\d*))?';


my @tests =
(
"1-234-567-8901",
"1-234-567-8901 x1234",
"1-234-567-8901 ext1234",
"1 (234) 567-8901",
"1.234.567.8901",
"1/234/567/8901",
"12345678901",
"not a phone number"
);

foreach my $num (@tests)
{
        if( $num =~ m/$us_phone_regex/ )
        {
                print "match [$1-$2-$3]\n" if not defined $4;
                print "match [$1-$2-$3 $5]\n" if defined $4;
        }
        else
        {
                print "no match [$num]\n";
        }
}

#
# Extract all phone numbers from an arbitrary file.
#
my $external_filename =
        'http://web.textfiles.com/ezines/PHREAKSANDGEEKS/PnG-spring05.txt';
my @external_file = `curl $external_filename`;
foreach my $line (@external_file)
{
        if( $line =~ m/$us_phone_regex/ )
        {
                print "match $1 $2 $3\n";
        }
}

编辑:

你可以把\W*改成\s*\W?\s*在正则表达式中来收紧一点。当我编写正则表达式时，我并没有从验证表单上的用户输入的角度考虑它，但是这个更改使正则表达式可以用于此目的。

'1?\s*\W?\s*([2-9][0-8][0-9])\s*\W?\s*([2-9][0-9]{2})\s*\W?\s*([0-9]{4})(\se?x?t?(\d*))?';

事实上，至少在北美，有一个叫做NANP的规范。

你需要明确地说明你想要什么。什么是合法的分隔符?空格、破折号和句号?不允许分隔符?是否可以混合使用分隔符(例如+0.111-222.3333)?扩展(例如，111-222-3333 x 44444)将如何处理?那特殊的号码呢，比如911?区号是可选的还是必须的?

这是一个7位或10位数字的正则表达式，允许扩展，分隔符是空格，破折号或句号:

^(?:(?:\+?1\s*(?:[.-]\s*)?)?(?:\(\s*([2-9]1[02-9]|[2-9][02-8]1|[2-9][02-8][02-9])\s*\)|([2-9]1[02-9]|[2-9][02-8]1|[2-9][02-8][02-9]))\s*(?:[.-]\s*)?)?([2-9]1[02-9]|[2-9][02-9]1|[2-9][02-9]{2})\s*(?:[.-]\s*)?([0-9]{4})(?:\s*(?:#|x\.?|ext\.?|extension)\s*(\d+))?$

你可能会更好地使用掩码输入。这样用户只能输入数字，你可以设置你认为合适的格式。我不确定这是否是一个web应用程序，但如果是有一个非常点击jQuery插件，提供了一些选项来做这件事。

http://digitalbush.com/projects/masked-input-plugin/

他们甚至在教程中讨论了如何屏蔽电话号码输入。

我在一家市场研究公司工作，我们必须一直过滤这些类型的输入。你把事情复杂化了。去掉非字母数字字符，看看是否有扩展。

为了进一步分析，你可以订阅众多提供商中的一家，这些提供商会让你访问有效号码数据库，并告诉你他们是座机还是移动电话，断开连接等等。这需要花钱。

/\b(\d{3}[^\d]{0,2}\d{3}[^\d]{0,2}\d{4})\b/

你看过RegExLib了吗?

输入一个美国的电话号码，你会发现很多可能性。