大佬教程收集整理的这篇文章主要介绍了在开发过程中,如何将Perl警告推广到致命错误?,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
我尝试了以下内容:在“t / lib”中,我创建了一个模块TestHelper.pm:
# TestHelper.pm use warnings FATAL => qw( all ); 1;
然后称之为测试套件:
$PERL5LIB=$PERL5LIB:./t/lib PERL5OPT=-MTestHelper.pm prove -l t/*.t
但是,这并没有将所有警告提示为致命错误的预期效果.我的警告正常,但警告似乎并没有被视为致命的.请注意,我所有的test.t脚本都有“使用警告”在他们中 – 也许这是超过了TestHelper.pm中的一个,因为“使用警告”有一个本地范围?
相反,我做到了这一点:
# TestHelper.pm # Promote all warnings to fatal $SIG{__WARN__} = sub { die @_; }; 1;
这是有效的,但有一个代码的气味.我也不喜欢它在第一个警告上炸弹.我宁愿测试套件运行完整,记录所有警告,但测试状态最终失败,因为代码运行警告.
有没有更好的方法来达到这个最终结果?
以上是大佬教程为你收集整理的在开发过程中,如何将Perl警告推广到致命错误?全部内容,希望文章能够帮你解决在开发过程中,如何将Perl警告推广到致命错误?所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。