baris yang copy("$tempdir/email.txt", "$tempdir/parts/email.txt");
bisa juga diganti jadi link("$tempdir/email.txt",
"$tempdir/parts/email.txt");
jadi ndak butuh modul perl file::copy
katanya email dari om asfik
NOTE: change "copy" to "link" in the patch to improve performance
and remove the need for File::Copy
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, March 05, 2004 4:17 PM
Subject: [postfix-users] Re: clamavis tidak detek virus Beagle
> Di bawah ini potongan e-mail dari
> http://marc.theaimsgroup.com/?l=amavis-user&m=107830495801266&w=2
>
> ----------------------------------------------------------------------
> That didn't seem to help for us. However, I wrote that patch I
> promised in the original email, and clamav does catch them now.
>
> Here it is. It's pretty short.
>
> *** amavisd Sun Jan 4 17:00:19 2004
> --- /usr/local/sbin/amavisd Tue Mar 2 10:54:52 2004
> ***************
> *** 4785,4790 ****
> --- 4785,4791 ----
> use Digest::MD5;
> use Net::Server 0.83;
> use Net::Server::PreForkSimple;
> + use File::Copy;
>
> BEGIN {
> import Amavis::Conf qw(:platform :confvars :notifyconf :sa);
> ***************
> *** 5305,5310 ****
> --- 5306,5312 ----
> $msginfo->mime_entity(mime_decode($fh,$tempdir));
> prolong_timer($which_section);
> }
> + copy("$tempdir/email.txt", "$tempdir/parts/email.txt");
> $which_section = "virus_scan";
> # some virus scanners behave badly if interrupted,
> # so for now just turn off the timer
>
> --
> Ted Cabeen
> Sr. Systems/Network Administrator
> Impulse Internet Services
