如何使脚本在Perl调试器中以指定值返回？

Question

我尝试了各种各样的方法，但都没有用......

  DB<4> T
. = main::t() called from file `dbg' line 6
  DB<4> return;

  DB<5> T
. = main::t() called from file `dbg' line 6
  DB<5> return 1;

  DB<6> T
. = main::t() called from file `dbg' line 6
  DB<6> eval('return')

  DB<7> T
. = main::t() called from file `dbg' line 6

重点是我不希望运行后续代码，只返回指定值。

所以它不是r。

Answer 1

这显然是贫民窟，但你可以等到你退出常规，然后在继续调用例程之前手动设置左值。