(add-hook 'perl-mode-hook
          (lambda ()
            (unless (or (file-exists-p "makefile")
                        (file-exists-p "Makefile"))
              (set (make-local-variable 'compile-command)
                   (concat "perl -c "
	                         (file-name-completion buffer-file-name))))))