@y = map { condition($_) ? $_ : () } @x; #### @y = grep { condition($_) } @x;