+
+** write color syntax for =Man-mode=
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+ (font-lock-add-keywords 'perl-mode '(("\\(|\\w+?\\(,\\w+?\\)?|\\)" 1 'py-builtins-face)))
+
+ (font-lock-add-keywords
+ 'cperl-mode
+ '(("\\(say\\)" . font-lock-constant-face)))
+#+END_SRC
+