my (@odd, @even);
push @{ $. & 1 ? \@odd : \@even }, $_ while <FILE>;