use List::Util shuffle;
		@weighteddiv  = shuffle @weighteddiv;
		@selected = ();
		foreach $i (0..$maxclients-1) {
		xyz:
			if ($#weighteddiv > = 0) {
				$idx=int(rand($#weighteddiv));
				$selected[$i] = $weighteddiv[$idx];
				if ($i>0) {
					foreach $j (0..$i-1) {
						if ($selected[$i] == $selected[$j]) {
							goto xyz
						}
					}
				}
			}
		}