perl - 启用全局警告

Question

我必须优化一个用 Perl 编写的内部网(大约 3000 个文件)。我想做的第一件事是启用警告“-w”或“use warnings;”，这样我就可以摆脱所有这些错误，然后尝试实现“use strict;”。

有没有办法告诉 Perl 一直使用警告(如 php.ini 中的设置 PHP)，而无需修改每个脚本以将“-w”添加到它的第一行？

我什至想为 /usr/bin/perl 取一个别名, 或者将它移到另一个名称并制作一个简单的脚本而不是仅仅添加 -w标志(如代理)。

你会如何调试它？

Answer 1

好…

您可以将 PERL5OPT 变量设置为保持 -w .见perlrun manpage详情。我希望你也考虑污染，比如 -T或者 -t ，用于安全跟踪。

但我不羡慕你。在没有 use warnings 的好处的情况下开发的改造代码和 use strict通常是皇家皮塔饼。

我有一个 standard boiler-plate我用来启动新的 Perl 程序。但我还没有考虑过 CGI 程序，这可能会受益于对样板的一些调整。