Made change to account for milter logging changes in ClamAV 0.81 Enjoy, Brett
Options: -h Help -f Log file -l Log type - valid types are: amavis and milter - Defaults to milter -r Show recipients -s Show senders - Milter only -c Minimum virus count for unique hosts -v Minimum virus type count -m Email report to predefined values set in this perl script -V Version For example: ./source_virus_count.pl -l amavis -f amavis/amavis.log -r -c 10 Shows a count of each virus type: Count is 16 for Worm.SomeFool.P Count is 13 for Worm.Zafi.B Count is 7 for Worm.Klez.H Count is 3 for Worm.SomeFool.Gen-1 Count is 1 for Worm.SomeFool.Q Count is 1 for Worm.SomeFool.I Count is 1 for Worm.Bagle.Gen-zippwd, Worm.Bagle.Gen-zippwd Count is 1 for Worm.Bagle.AG.2 Count is 1 for Worm.SomeFool.X Shows uniques hosts with a virus count over 10: mail.nsslawoffice.com sent the following virus's a total of 12 times: Worm.Zafi.B was transmitted 12 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times. Recipient address [EMAIL PROTECTED] was seen 1 times.
source_virus_count.pl
Description: Perl program
_______________________________________________ http://lists.clamav.net/cgi-bin/mailman/listinfo/clamav-users
