Nathan Trapuzzano <nbtrap@nbtrap.com> writes:

> Try the attached patch.  

Thanks.

> Make sure you set cperl-imenu-index-pod to nil before invoking
> cperl-mode.  

Done.  See the screenshot.  

> If it does what you want

Pay particular attention to the hollow rectangle which tells you where
the cursor is.  Mode line is reporting the previous defun and NOT the
current defun.