$w[$_] = int rand(10) foreach (0..$max);