This is a job for emacsclient. You might start with something like this:

use Data::Dumper;

sub emed {
     eval eval `emacsclient -e '
(with-temp-buffer
  (insert "@{[quotemeta Dumper $_[0]]}")
  (pop-to-buffer (current-buffer))
  (recursive-edit)
  (buffer-substring-no-properties (point-min) (point-max)))'`
}
[download]

Use M-: (throw 'exit nil) to leave Emacs.