Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: Simple regex should match number

by repellent (Priest)
on Feb 01, 2012 at 07:41 UTC ( #951139=note: print w/replies, xml ) Need Help??

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 ./ line 16. not ok 5 # Failed test at ./ line 17. not ok 6 # Failed test at ./ line 18. not ok 7 # Failed test at ./ 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.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://951139]
[marto]: sadly I've still not remembered the name of that x86 all in one we discussed
[Corion]: marto: Heh - I looked at the Intel things and they were all at EUR 80 or upwards, and that's a bit too much (or rather, for that money, I'd look for a NAS already)
[marto]: click bait marketing is making it harder to find stuff I can't remember based upon a few terms :(
[Corion]: :)

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2018-01-17 15:21 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (201 votes). Check out past polls.