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

Re^2: extracting data

by moritz (Cardinal)
on Jun 27, 2012 at 08:25 UTC ( #978582=note: print w/ replies, xml ) Need Help??


in reply to Re: extracting data
in thread extracting data

print "$def\n" if ! $val or $val =~ /^0|1$/;

Note that !$val already covers the case where $val is 0.

Also /^0|1$/ is not what you might think it is. The OR | in regexes has a looser precedence than concatenation, which means the regex is the same as ^0 OR 1$, so it also matches strings like 0foo or bar1.

The correct way to write it is /^(0|1)$/, or if you don't want to create a capture, /^(?:0|1)$/.


Comment on Re^2: extracting data
Select or Download Code
Re^3: extracting data
by kcott (Abbot) on Jun 27, 2012 at 09:03 UTC

    ++ Thanks for spotting that. I've updated my node.

    I wasn't aware of the precedence issue: thanks for the good explanation.

    -- Ken

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://978582]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (9)
As of 2014-08-31 09:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (294 votes), past polls