Re: Simple regex should match number

[Anonymous Monk]

Yup, it works in 5.14.1 but doesn't work in 5.12.2

my $str = "1";
if ($str =~ m/-?\p{Nd}/){
   print "Matches\n";
} else {
   print "Doesn't match\n";
}
__END__
Doesn't match

What does work in 5.12.2 (and I assume 5.10) is adding a quantifier, say m/-?\p{Nd}{1}/

[Anonymous Monk]

Adding use re 'debug'; for m/-?\p{Nd}/ and  m/-?\p{Nd}{1}/ shows

Read more... (755 Bytes)	Read more... (1475 Bytes)
Read more... (1028 Bytes)	Read more... (1059 Bytes)