foreach (@CHOICE) { if ($_ && /.../) { ... } } #### foreach (@CHOICE) { $_ or next; if (/.../) { ... } }