http://www.perlmonks.org?node_id=400714


in reply to Re: Compare all array values without a loop
in thread Compare all array values without a loop

Assuming that $foobar isn't undefined you should have a definedness check for the return value of first too. $foobar may be 0 or "".

If undef is allowed as comparision value, use 

    defined(
        defined $foobar
        ? first { $_ eq $foobar } @array
        : first { not defined $array[$_] } 0 .. $#array
    )

[download]
instead.

ihb

See perltoc if you don't know which perldoc to read!
Read argumentation in its context!

In Section Seekers of Perl Wisdom