Add an action method for TOP
regex TOP { <integer> <addop> <integer> {*} }
regex integer { \d+ {*} }
regex addop { [ '+' | '-' ] {*} }
method TOP($/) { say("found an expression ", $/); }
method integer($/) { say("found an integer ", $/); }
method addop($/) { say("found an addop ", $/); }
continued...