Re^2: boolean IN(); function in perl like

Or List::MoreUtil's even more correct 'any' function.

if ( any { $_ eq $foo } @list ) {

}
[download]

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
}
[download]

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

Comment on Re^2: boolean IN(); function in perl like Select or Download Code

Replies are listed 'Best First'.
Re^3: boolean IN(); function in perl like by Errto (Vicar) on Jan 17, 2005 at 04:31 UTC
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.	[reply] [d/l] [select]