(cperl-indent-region, cperl-imenu--create-perl-index, cperl-xsub-scan):