my @evens;
{
    last unless @all;
    shift @all;
    last unless @all;
    push @evens, shift @all;
    redo;
}