{
    my $temp = $a[ $i ];
    $a[ $i ] = $a[ $j ];
    $a[ $j ] = $temp;
}