Re: Switch the odd/even elements of an array

[wind]

use xor on the array indexes:

my @foo = (1..8);

my @bar = @foo[map {$_ ^ 1} (0..$#foo)];

print "@bar";

Outputs

2 1 4 3 6 5 8 7

- Miller