解决方法
不完全缩小,但您可以使用
B::Deparse编译Perl脚本,然后将其反编译回Perl.
你可以区分结果.
一个简单的命令行示例如下：
david@Workstation:comp # perl -MO=Deparse 1.pl > a.pl 1.pl Syntax OK david@Workstation:comp # perl -MO=Deparse 2.pl > b.pl 2.pl Syntax OK david@Workstation:comp # diff a.pl b.pl david@Workstation:comp # diff 1.pl 2.pl 3c3,5 < say "Hello"; --- > > > say "Hello"; david@Workstation:comp #