Help for this page

Select Code to Download

Select or download this

(add-hook 'cperl-mode-hook
      '(lambda () (and (setq outline-regexp "sub") (outline-minor-mode
+))))

Select or download this
```
(setq outline-regexp "sub\\|^\\S-")
```