[Mimedefang] Re: Sophie 3.01/3.02 does not set $FoundVirus in mimedefang-filter
Andrzej Marecki
amr at astro.uni.torun.pl
Tue May 20 04:41:01 EDT 2003
Troy Carpenter wrote:
> In my mimedefang-filter, I have to set that variable manually. Here's
> the code I have:
>
> # Scan for viruses if any virus-scanners are installed
> $VirusScannerMessages = "";
> my($code, $category, $action) = message_contains_virus();
> -> $FoundVirus = ($category eq "virus");
> chomp $VirusScannerMessages;
> if ($FoundVirus) {
> # Do something here;
> }
My code is essentially the same:
sub filter_begin () {
# Scan for viruses if any virus-scanners are installed
my($code, $category, $action) = message_contains_virus();
$FoundVirus = ($category eq "virus");
[...]
}
Now, if I use *the same* perl code and _EVERYTHING ELSE_ but different
versions of Sophie, $FoundVirus variable here is not set properly if I use
Sophie 3.01/3.02 but is OK for version 1.43/1.44.
--
Andrzej
P.S. I run MIMEDefang/Sophie under Solaris 2.5 and Perl 5.7.2.
A.
--
-----------------------------------------------------------------------------
Andrzej Marecki |
Torun Centre for Astronomy | e-mail: amr at astro.uni.torun.pl
N. Copernicus University | WWW: http://www.astro.uni.torun.pl
ul. Gagarina 11 | tel: +48 56 6113032
PL-87-100 Torun, POLAND | fax: +48 56 6113009
-----------------------------------------------------------------------------
More information about the MIMEDefang
mailing list