Add basic bounce score calculation and reporting.

This commit is contained in:
Martin Kamerbeek 2010-05-20 16:52:19 +02:00
parent ddaaebe6a0
commit 40ba318fac
4 changed files with 70 additions and 7 deletions

View file

@ -1,5 +1,12 @@
#!/data/wre/prereqs/bin/perl
BEGIN {
unshift @INC, qw(
/data/custom/webgui_newsletter/lib
/data/WebGUI/lib
);
}
use strict;
use Mail::DeliveryStatus::BounceParser;
@ -12,12 +19,6 @@ my %configs = (
'martintwee.oqapi.nl' => 'martintwee.oqapi.nl.conf',
);
BEGIN {
unshift @INC, qw(
/data/custom/webgui_newsletter/lib
/data/WebGUI/lib
);
}
#---------------------------------------------------------------