### <Perl6>

@match = m:e/ X \d : .+? <before X \d | $ > /;

### </Perl6>