我有一个脚本,我试图使用perlcritic来贬低不良做法.
我有一行如下:
open(my($FREESPCHK),$cmdline ) || &zdie($MSG_PAsstHRU,"Error checking free space of file system.");
这给出了这个错误:
在xxx行x列使用双参数“open”.参见PBP第207页. (严重程度:5)
关于如何修复它的任何想法?
解决方法
要使Perl Critic闭嘴,但根本没有真正的好处,只需将代码修改为:
open(my $PIPE_FROM_FREESPCHK,"-|",$cmdline) || zdie($MSG_PAsstHRU,"Error checking free space of file system.");
但请注意,从更明显的角度来看,这绝对没有任何好处:
open(my $PIPE_FROM_FREESPCHK,"$cmdline |") || zdie($MSG_PAsstHRU,"Error checking free space of file system.");
因为你没有直接调用exec来分离你的标记.这看起来更像是这样的:
open(my $PIPE_FROM_FREESPCHK,$cmd_name,@cmd_args) || zdie($MSG_PAsstHRU,"Error checking free space of file system.");
问题是你是在运行shell命令还是只是执行某些操作.如果您的免费支票类似于df. 2> / dev / null | awk ….,然后你需要完整的shell.如果它只是df,那么你不会.