Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re: Regexp for range of numbers

by simon.proctor (Vicar)
on Apr 05, 2005 at 09:14 UTC ( #444908=note: print w/replies, xml ) Need Help??

in reply to Regexp for range of numbers

To repeat a node above, doing this with regex seems a little odd. Anyway, I thought I would take 5 and have a go. I did mine with look behinds (cos I rarely get to use them and its different to your solution). Not sure if my attempt is bone headed :). Still . . . here it is:
use strict; use warnings; my @nums; for(my $i = -100; $i < 400; $i++) { push @nums, $i; } foreach my $n (@nums) { if($n =~ /^[012]?(((?<=2)[0-5])|(?<!2)[0-9])?(((?<=25)[0-5])|(?<!2 +5)[0-9])$/) { print $n, ": pass\n"; } else { print $n, ": fail\n"; } }

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://444908]
erix especially likes the "alot is not a word" muttering

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (5)
As of 2017-06-24 07:22 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (557 votes). Check out past polls.