thanks, i'll try that !
Steffen Kaiser wrote:
On Thu, 6 May 2004, Jerome Tytgat wrote:
Is there a possibility, with mimedefang, to automatically save only the headers (I don't want the full mail, as forwarding virus is not a good idea) to a folder using for name the reference number of the mail (also found in MDLOG entries) for easy linking.
I do it like so in filter_end():
my $logd = $Features{'Path:QUARANTINEDIR'} . "/maillog"; if(-d $logd) { my $logf = "$logd/${MsgID}-Report-" . localtime() . ".txt"; if(open(LOG, ">$logf")) { print LOG $report; if(open(H, 'HEADERS')) { print LOG "\nHeaders:\n" . join('', <H>); close H; } else { print LOG "\nFailed to open headers: $!\n"; } close LOG; } else { skalog "\nFailed to create logfile: $logf: $!\n"; } } else { skalog "No maillog dir: $logd"; }
Bye,
-- ==================================== > J�r�me Tytgat Administrateur R�seau et S�curit� ASTERION - Impasse de la Hache CP 5911 - 44 477 CARQUEFOU CEDEX T: 02 40 300 800 - F: 02 40 25 10 74 ====================================
_______________________________________________ Visit http://www.mimedefang.org and http://www.canit.ca MIMEDefang mailing list [EMAIL PROTECTED] http://lists.roaringpenguin.com/mailman/listinfo/mimedefang
