# swap items 1 and 3
my $temp=$arr1[1]; $arr1[1]=$arr1[3]; $arr1[3]=$temp;
$temp=$arr2[1]; $arr2[1]=$arr2[3]; $arr2[3]=$temp;
$temp=$arr3[1]; $arr3[1]=$arr3[3]; $arr3[3]=$temp;