http://www.perlmonks.org?node_id=169198


in reply to Node Tension

Why multiply by two? It just means odd values will never be used.

I have a counterproposal for the formula: $t = int(rand(100)).

There is the problem that the value flips around a lot, and people might not take it seriously. So how about: