($x2 < $x) and ($x, $x2) = ($x2, $x); # Swap $x and $x2