#For every $n element in @List grep {not ++$i % $n} @List;