Ha, a off by error! was ok for histo, but not $count. The general idea of how to do it remains the same as well as comments on imperfections in the standard rand() function. the link I provided is a good starting place.

good luck in your backgammon match!