my $t = 0;
grep { ++$t % 2 } LIST