($freq[$i], $freq[$j]) = ($freq[$j], $freq[$i]); #### @freq[$i, $j] = @freq[$j, $i];