in reply to How to Do Multiple OR in For Loops

List::Util is core, try importing reduce();

untested:  if ( reduce { $a||$b } @myhash{@allpreds} ) {...}

Cheers Rolf

UPDATED: tested and works!

If you dont like the hashslice you can also use  map {$myhash{$_}} @allpreds instead.