in reply to Re^2: is rand random enough to simulate dice rolls?
in thread is rand random enough to simulate dice rolls?
Note that you don't really need the two ok's in the else since the conditions have already been tested, and in fact they may fail in case $avg==3.4 or $avg==3.6. You could just do else { pass "average randomness ok (3.4 < 10000d6 / 10000 < 3.6)" } instead.
In Section
Seekers of Perl Wisdom