}
else {
into
} else {
To stop this, use
(setq cperl-merge-trailing-else nil)
cperl-mode's default is to add underlines to trailing whitespace (spaces or tabs at the end of lines). Turn off underlines for trailign whitespace EmacsWiki
(setq cperl-invalid-face nil) (setq cperl-invalid-face (quote off))