my @even = @{ $odd_even->[0] }; my @odd = @{ $odd_even->[1] };