Function: cperl-perldoc
cperl-perldoc is an autoloaded, interactive and byte-compiled function
defined in cperl-mode.el.gz.
Signature
(cperl-perldoc WORD)
Documentation
Run perldoc on WORD.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
;; By Anthony Foiani <afoiani@uswest.com>
;; Getting help on modules in C-h f ?
;; This is a modified version of `man'.
;; Need to teach it how to lookup functions
;;;###autoload
(defun cperl-perldoc (word)
"Run `perldoc' on WORD."
(interactive
(list (let* ((default-entry (cperl-word-at-point))
(input (read-string
(cperl--format-prompt "perldoc entry" default-entry))))
(if (string= input "")
(if (string= default-entry "")
(error "No perldoc args given")
default-entry)
input))))
(require 'man)
(let* ((case-fold-search nil)
(is-func (and
(string-match "^\\(-[A-Za-z]\\|[a-z]+\\)$" word)
(string-match (concat "^" word "\\>")
(documentation-property
'cperl-short-docs
'variable-documentation))))
(Man-switches "")
(manual-program (concat "perldoc -i" (if is-func " -f"))))
(Man-getpage-in-background word)))