http://qs1969.pair.com?node_id=951139


in reply to Simple regex should match number

Really weird, looks like a bug:
use Test::More; ok( 1 =~ m/\p{Nd}/ ); ok( 1 =~ m/^-?\p{Nd}/ ); ok( 1 =~ m/-?\p{Nd}+/ ); ok( 1 =~ m/-?\p{Nd}/ ); ok( 1 =~ m/-*\p{Nd}/ ); ok( 1 =~ m/x?\p{Nd}/ ); ok( 1 =~ m/x?y?\p{Nd}/ ); done_testing(); __END__ ok 1 ok 2 ok 3 not ok 4 # Failed test at ./t.pl line 16. not ok 5 # Failed test at ./t.pl line 17. not ok 6 # Failed test at ./t.pl line 18. not ok 7 # Failed test at ./t.pl line 19. 1..7 # Looks like you failed 4 tests of 7.

$ perl -v This is perl, v5.10.0 built for darwin-thread-multi-2level

Replies are listed 'Best First'.
Re^2: Simple regex should match number
by JavaFan (Canon) on Feb 01, 2012 at 11:51 UTC
    That's a known bug, and, AFAIK, fixed in 5.14.0. It's certainly fixed in 5.14.2.