grep { BLOCK } @list; # slow grep EXPRESSION, @list; # fast