push @array, reverse @array[ 0 .. $n / 2 - 1 ];