你可以在emacs中使用org-babel;打开一个组织模式文件，即tmp.org，然后你可以这样做:

#+begin_src perl :results output
@a = (1,5,9);
print ((join ", ", @a) . "\n");
$b = scalar @a;
print "$#a, $b\n";
print "$#a, " . @a . "\n";
print join ", ", 1..$#a; print "\n";
print join ", ", @a[0..$#a]
#+end_src

按CTRL-c CTRL-c将计算该块:

#+RESULTS:
#+begin_example
1, 5, 9
2, 3
2, 3
1, 2
1, 5, 9
#+end_example

我不确定这需要什么emacs配置，但我认为您可以安装https://github.com/hlissner/doom-emacs并启用它的perl和org-mode模块。

Perl没有控制台，但是调试器可以作为控制台使用。在命令提示符下，键入perl -de 1。(值“1”无关紧要，它只是一个没有任何作用的有效语句。)

Perl shell也有几个选项: 存档的“perlfaq3”页面，其中包含问题“有Perl Shell吗?”

有关更多信息，请阅读perlfaq3(当前版本)。

还可以在CPAN上查找ptkdb: http://search.cpan.org/search?query=ptkdb&mode=all

Sepia和PDE也有自己的reps(用于GNU Emacs)。

我写了一个脚本，我称之为“psh”:

#! /usr/bin/perl

while (<>) {
  chomp;
  my $result = eval;
  print "$_ = $result\n";
}

不管你输入什么，它都会在Perl中计算:

> gmtime(2**30)
gmtime(2**30) = Sat Jan 10 13:37:04 2004

> $x = 'foo'
$x = 'foo' = foo

> $x =~ s/o/a/g
$x =~ s/o/a/g = 2

> $x
$x = faa

我总是这样做:

rlwrap perl -wlne'eval;print$@if$@'

使用5.10，我已经切换到:

rlwrap perl -wnE'say eval()//$@'

(rlwrap是可选的)