if (/foo|bar|baz/) { push @biff, $_; }
(Update: fixed typo)
Perl 6 in German -- Difficult Sudoku
In reply to Re: parsing a very large array with regexps by moritz in thread parsing a very large array with regexps by pc2