我的Perl Web应用程序在Apache mod_fastcgi下运行时,经常出现以下错误:
有什么想法吗?
编辑:谢谢大家的建议。有人问第119行是什么。抱歉,我应该把它放进去的。它在一个代码块中,我在上传文件时运行病毒检查器。我不是每次都会得到这个错误,只是偶尔。
我看到这种情况发生在文件上传方面,但我不确定这是唯一发生的时间。在我得到这个错误之前(或可能之后),我还会收到一个SIGPIPE信号。在第119行超过了挂起信号的最大计数(120)。
有什么想法吗?
编辑:谢谢大家的建议。有人问第119行是什么。抱歉,我应该把它放进去的。它在一个代码块中,我在上传文件时运行病毒检查器。我不是每次都会得到这个错误,只是偶尔。
if(open VIRUS_CK, '|/usr/local/bin/clamscan - --no-summary >'.$tmp_file) {
print VIRUS_CK $data; // THIS IS LINE 119
close VIRUS_CK;
if (($? >> 8) == 1) {
open VIRUS_OUTPUT, '<'.$tmp_file;
my $vout = <VIRUS_OUTPUT>;
close VIRUS_OUTPUT;
$vout =~ s/^stdin:\s//;
$vout =~ s/FOUND$//;
print STDERR "virus found on upload: $vout\n";
return undef, 'could not accept attachment, virus found: '.$vout;
}
unlink($tmp_file);
}