@moo = grep {; {if ($_ % 2 > 0){ 0;last; } 1;}}  @moo;