[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