cperl-contract-levels
cperl-contract-levels is an interactive compiled Lisp function in `cperl-mode.el
'.
(cperl-contract-levels)
Find an enclosing group in regexp and contract all the kids.
(Experimental, may change semantics, recheck the result.)
We suppose that the regexp is scanned already.