#
# KasperskyLab AVPDaemonClient
#

if ($avpdc ne "") {
	$output = `$avpdc $TEMPDIR/parts`;
	$errval = ($? >> 8);
	do_log(2,$output);
	if ($errval != 0) {
		if ($errval == 4) {
			@virusname = ($output =~ /infected: (.+)/g);
			do_virus($output);
		} else {
			do_log(0,"Virus scanner failure: $avpdc (error code: $errval)");
		}
	}
}
