regex -\d+ 正则表达式忽略开头的减号

Question

我遇到了 Perl 的行为，我无法解释:

#!/usr/bin/perl

use strict;
use warnings;

my $number = -10;
if ($number =~ /\d+/) {
    print $number;
}

这会打印 -10，尽管事实是

• \d代表[0-9]

为什么忽略开头的减号？

Answer 1

你也应该用 ^: 匹配字符串的开头

if ($number =~ /^\d+/) {