$roll = int(rand(6)) + 1;       # $roll is now an integer
				# between 1 and 6
