for my $i ( 0 .. $#in ) {
    $i % 2 ? push @out2, $in[$i] : push @out1, $in[$i];
}