我想你是在问perl的REPL(读取，计算，打印，循环)接口。有几种方法可以做到这一点:

马特·特劳特(Matt Trout)有一篇文章描述了如何写一个 阿德里亚诺·费雷拉描述了一些选择 最后，你可以在irc.perl.org上登陆IRC，并在许多流行的频道中尝试其中一个评估机器人。他们会计算你传递给他们的perl代码块。

我总是这样做:

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

使用5.10，我已经切换到:

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

(rlwrap是可选的)

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

Perl -d是你的朋友:

% perl -de 0

Read-eval-print循环:

$ perl -e'while(<>){print eval,"\n"}'

参见时髦的REPL(适用于GNU Emacs)