I'm working on it, but as i'm still student, i have LOTS of work to do. But it's one of my priorities..
Hi Landry,
I'm working on an english translation.
The following code segment seems to be working wrong: no output!
=====================================================
if (-e "/usr/sbin/clamd")
{ my $sigs=0;
foreach (/usr/bin/tail -n 4 /var/log/clamav/freshclam.log)
{
# ClamAV update process started at Thu Jul 29 18:36:00 2004
if (/^ClamAV update process started at (\w{3} \w{3}\s{1,2}\d{1,3} [0-9:]{8} \d{4})/)
{
print $q->p("Derniere mise a jour de l'antivirus ClamAV : $1.\n");
}
# main.cvd is up to date (version: 24, sigs: 21793, f-level: 2, builder: tomek)
# daily.cvd is up to date (version: 428, sigs: 1177, f-level: 2, builder: acab)
# Database updated (23150 signatures) from database
if (/sigs: (\d+)/)
{
$sigs+=$1;
}
print $q->p("The database contains $sigs virus signatures.\n");
}
}
====================================================
Can you check this for me, I will gladly correct the code and send it to you as soon as it's translated.
Regards,
Ernesto Lorenz