Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re: boolean IN(); function in perl like

by premchai21 (Curate)
on Jan 15, 2005 at 06:01 UTC ( #422463=note: print w/replies, xml ) Need Help??

in reply to boolean IN(); function in perl like

I'm surprised no one mentioned List::Util's "first" routine yet.

first {$_ eq $e} @a

I'm not sure this works properly if $e is undef, though.

Replies are listed 'Best First'.
Re^2: boolean IN(); function in perl like
by adamk (Chaplain) on Jan 17, 2005 at 03:50 UTC
    Or List::MoreUtil's even more correct 'any' function.
    if ( any { $_ eq $foo } @list ) { }
    If you are wondering why first isn't enough, imagine...
    if ( first { ! defined $_ } @list ) { # Does not get called if it matches } if ( any { ! defined $_ } @list ) { # Does get called it if matches }
    Of course, this assumes you only need to check once and once only. If you want to check many times, build the hash index and do it that way.

    Edit by castaway - swapped lotsa br tags for code tags

      Very right. ++ At a more basic level, this is why exists exists. Things may be there but have false values.

      Btw, please use <code> tags instead of <pre> tags when posting code. Cheers.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://422463]
[choroba]: I'm curious which part of your signature do they find offensive.
[LanX]: they?
[LanX]: click!
[choroba]: they
[LanX]: why do you think it's more than one person?
[Your Mother]: Because we are LEGION! Fix YOUR SIG SIG BLOCK!!!!
[Your Mother]: Forgot to sign in as my sockpuppet, how embarrassing!
[1nickt]: pryrt I am creating a Type to check valid user IDs, which must be a whole number greater than or equal to zero. I would like to disallow 1.0 but because of this behaviour, by the time it is checked by the constraint, it *is* an Int.
[LanX]: should this be considered? Re: Parsing .txt into arrays
[LanX]: and this Re^4: Hash user input

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (15)
As of 2017-05-24 20:11 GMT
Find Nodes?
    Voting Booth?