;; Perl
(defvaralias 'perl-indent-level 'tab-width)
(add-hook-and-eval
'perl-mode-hook
(lambda ()
(set (make-local-variable 'compile-command) (concat "perl " (shell-quote-argument buffer-file-name)))))
(provide 'mode-perl)