Forwarded from the BTS (#1596).  Lest we forget....
>>>> "jwz" == Jamie Zawinski <jwz(a)jwz.org>
writes: 
* First and foremost, you need to rewrite the fontification of
  cperl-mode so that it highlights tokens based on
symbol-constituent      characters rather than word-constituent.   
  Don't suggest `cperl-under-as-char' -- that's totally bogus.
  In this code:
     sub open_foo {
     }
  I get "open" in 'font-lock-type-face.  That's wrong: it should only
  fontify "open" if it is the whole *token*.  And, simultaniously, M-f
  should stop at the underscore: that is, _ must have "_" syntax, not
  "w" syntax.
* Second, what's this "underline whitespace at end-of-line so that I
  can't tell whether it's a space or a spurious underscore character"
  nonsense that got introduced recently?  That's insane!  Turn it off!
* Third, if you're going to do that insane thing, DON'T use the face 
  named 'underline!  Use a face named 'cperl-moronic-underline-face or
  something, so that I can do (copy-face 'default 'bozo-face) in my 
  .emacs file to disable it before perl-mode is loaded.  (I can't
  figure out how to turn this off -- (setq cperl-invalid-face nil) 
  does nothing.)
-- 
Jamie Zawinski
jwz(a)jwz.org             
http://www.jwz.org/
jwz(a)dnalounge.com       
http://www.dnalounge.com/
-- 
University of Tsukuba                Tennodai 1-1-1 Tsukuba 305-8573 JAPAN
Institute of Policy and Planning Sciences       Tel/fax: +81 (298) 53-5091
_________________  _________________  _________________  _________________
What are those straight lines for?  "XEmacs rules."