Select Code to Download

#!/usr/bin/perl -w

...
  # Close and save note.
  $note->close($olc->{olSave});
}

;; Make F9 key copy the entire buffer to a new MS Outlook note
(global-set-key [f9] ' copy-buffer-to-outlook-note)
...
  "Copy current buffer to MS Outlook note."
  (interactive)
  (shell-command (format "%s %s" "perl c:/perl/txt2note.pl"  buffer-fi
+le-name)))