Variable: cperl--block-declaration-rx

cperl--block-declaration-rx is a variable defined in cperl-mode.el.gz.

Value

(sequence (or "class" "method" "package" "sub")
	  (1+
	   (or (sequence (or space "\n"))
	       (sequence "#" (0+ (not (in "\n"))) "\n")))
	  (or
	   (sequence
	    (1+
	     (sequence (opt (regex "[_[:alpha:]][_[:word:]]*")) "::"))
	    (opt (regex "[_[:alpha:]][_[:word:]]*")))
	   (regex "[_[:alpha:]][_[:word:]]*")))

Documentation

A regular expression to find a declaration for a named block.

Used for indentation. These declarations introduce a block which does not need a semicolon to terminate the statement.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
  ;; I don't dare to think about :writer where the generated name does
  ;; not even occur in the text.

(defconst cperl--block-declaration-rx
  `(sequence
    (or "class" "method" "package" "sub")
    (1+ ,cperl--ws-or-comment-rx)
    ,cperl--normal-identifier-rx)
  "A regular expression to find a declaration for a named block.
Used for indentation.  These declarations introduce a block which
does not need a semicolon to terminate the statement.")