cyocum-dice

use v6;

grammar DiceParser {

regex TOP { ^ <numdice> 'd' <numsides> <modifier>? $ };

rule modifier { <plusminus> <digit>+ };

regex numdice { <digit>+ };

regex numsides { <digit>+ };

regex plusminus { \+ | \- };

};

my Match $match = DiceParser.parse('2d6+2');
say $match<modifier><plusminus>;