swap(\$a[$i], \$a[$random]);