如何在perl one liner中查看由n或p开关生成的代码块

Question

我相信我之前已经运行了这个,但是对于我的生活,我无法在perlrun或Google中找到任何参考.希望这里的一些perl boffins能够回答它.使用-ne开关运行perl one衬管时.是否有选项可以将perl编译的代码输出到控制台？

所以如果我跑:

crontab -l | perl -ne 'print if /^00/'

然后Perl会将其编译为:

while(<>){
   print if /^00/;
}

我确信有一种方法可以让perl吐出它将要使用的代码,包括任何开始或结束块.希望有人知道如何.

Answer 1

您可能正在考虑这个B::Deparse功能:

perl -MO=Deparse -ne 'print if /^00/'