sepCapWithin, sepCapWithout

[jamesdbrock]

Implement

sepCapWithin :: m mask -> m a -> m [Either (Tokens s), a]

[jamesdbrock]

This is basically the same as https://www.rexegg.com/regex-best-trick.html