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