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


in reply to And plus OR

for maintainability reasons the code could be changed to something like that:
use List::Util qw(none); my @types = ( 'Check In', 'Check Out' ); if ($username eq $security && none { $type eq $_ } @types ){}