如何使用a设置perl脚本中的污点模式
#!/usr/bin/env perl
家当?
解决方法
您可以在shebang行上传递PERL5OPT环境变量:
#!/usr/bin/env PERL5OPT=-T perl
这似乎和我相反.
另一个选项是,如果您检测到它不在,则以污迹模式重新执行脚本:
#!/usr/bin/env perl warn 'Taint mode is '.(${^TAINT} ? 'on' : 'off'); # For debugging exec($^X,'-T',$0,@ARGV) unless ${^TAINT}; # do stuff under taint mode here
显然,这是一个重大的启动表现.