;;; EmacsWiki Varsion (defun perltidy-region () "Run perltidy on the current region." (interactive) (save-excursion (shell-command-on-region (point) (mark) "perltidy -q" nil t))) (defun perltidy-defun () "Run perltidy on the current defun." (interactive) (save-excursion (mark-defun) (perltidy-region))) を .emacs などに書いておいて M-x perltidy-region っとすることで整形することができる。 現在id:Ashizawaを移植中です。id:AshizawaはTipsや