Re^2: Shortcutting grep in boolean context

[perlancar]

Ah yes, this is a nice idiom, and to use it in an expression, one can use e.g. do:

if (do { my $found; $_ == $wanted and $found = 1 and last for @ary; $found }) { say "match" }'

[tybalt89]

To avoid a temporary variable:

if( sub{ $_ == $wanted and return 1 for @ary; 0 }->() ) { say "match" 
+}

[perlancar]

The sub version has a higher overhead than the do version, but the speed won't matter unless we do hundreds of thousands of calls per second or more.