запустить perlscript из emacs (пример cscript // C: Perlscript)

Question

Я хотел бы создать комбинацию клавиш для emacs для выполнения этой команды:

cscript example //C:Perlscript

, где example.pl - скрипт perl, который я хочу выполнить

я уже получил ярлык для выполнения perl: (global-set-key (kbd "") 'perl-eval) как мне это сделать?

Answer 1

Попробуйте это

(defun run-command () "Run hard coded shell command" (interactive)
   (shell-command (concat "cscript " buffer-file-name " //C:Perlscript")))
(global-set-key (kbd "<f2>") 'run-command)