($x, $y) = ($y, $x);
    @array[$j, $j+1] = @array[$j+1, $j];