[EMACS]correct cperl mode hook setq error

"File mode specification error": (void-function cperl-hairy)