$digit   = zero | oh | one | two | three | four | five | six | 
           seven | eight | nine;
$grammar = [separator%%] ($digit [separator%%])<+> [separator%%];