my @Dice = qw(1d4 1d6 1d8 1d10 1d12 1d20);