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