#
# McAfee
# 

if ($uvscan) {
    do_log(2,"Using $uvscan");
    chop($output = `$uvscan --secure -rv --summary --noboot $TEMPDIR/parts`);
    $errval = retcode($?);
    $scanner_errors &= $errval;
    do_log(2,$output);
    if ($errval) {
	if ($errval == 13) {
	    my $loutput = $output;
	    $loutput =~ s/Found: (.+) NOT a/Found the $1/g;
	    $loutput =~ s/Found the (.+) trojan/Found the $1 virus/g;
	    $loutput =~ s/Found virus or variant (.+) /Found the $1 virus/g;
	    @virusname = ($loutput =~ /Found the (.+) virus/g);
	    do_virus();
	} else {
	    do_log(0,"Virus scanner failure: $uvscan (error code: $errval)");
	}
    }
}
