grammar A {
  token TOP {
    <my>\s+<mt>\s* ||
    <my>\s*<mm>\s+<mt>\s*
  }

  token my { \d+ }

  proto token mm {*}
    token mm:sym<a> { '(' <[a..zA..Z\d]>**0..* ')' }

  token mt { <.dec> }
  token dec { <[\d,.]>+ }
}

say A.parse('0000 (a) 5,555,555');
say A.parse('0000 (a0) 6,666,666');