my @new_order = (2, 1, 0);

##</code><code>##

my @new_aoa = map [ @$_[@new_order] ], @AoA;