my $t = 1;
grep { $t^=1 } LIST