Current File : //proc/24011/root/proc/self/root/bin/scan

#!/usr/bin/perl

$var = shift;
$email = shift;
$quar = shift;

usage() if ($var eq ""); 
usage() if ($email eq ""); 



if ($quar eq "") {
	$cmd = "/usr/sbin/cxs --exploitscan --virusscan -I /etc/cxs/cxs.ignore --mail $email --options mMOLfSGchednZD --qoptions Mv --summary --user=".$var;
	system($cmd);
} else {
	$cmd = "/usr/sbin/cxs --exploitscan --virusscan -I /etc/cxs/cxs.ignore --mail $email --options mMOLfSGchednZD --qoptions Mv --summary --quarantine /var/cache/cxs/quarentena/ --user=".$var;
        system($cmd);
}


sub usage {

	print "Usage:\n\n";
	print "scan [user] [email para onde deve ser enviado o relatorio - EVITAR A DESK !] [quarentena - em branco para não colocar em quarentena]";
	print "\n\n";
	exit;

}