i haven't had much time to look this code over, but i noticed that you're forcing 5.008. i know that constant has extended syntax in that release, so you can do something like:

use constant {
  ANTE => 5,
  DOUBLE_SKUNK_PENALTY => 5,
  POINTS_TO_WIN => 100,  # as long as I'm making it flexible...
  COWS_CAME_HOME => 10000,  # protect against all players getting into
+ a state where they always roll until skunked.
};
[download]

which i think is somewhat cleaner than the old syntax.

~Particle *accelerates*