Like this?
my @orig_array = qw(0 1 1 0 1 0 0 0 1 1 1 0 0 0 0);
my @new_index_order = qw(8 3 4 9 11 6 7 0 14 10 1 12 2 5 13);;
my @new_array = @orig_array[ @new_index_order ];;
print @new_array;;
1 0 1 1 0 0 0 0 0 1 1 0 1 0 0
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
Lingua non convalesco, consenesco et abolesco. -- Rule 1 has a caveat! -- Who broke the cabal?
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.