[PLUG] SpamCannibal trouble...
Michael C. Robinson
plug_1 at robinson-west.com
Mon Aug 16 05:44:19 UTC 2010
> Someone,
>
> Did you issue a $db->finish; before closing the data base?
>
> Ken
> CAD 2 CAM
>
...
my %default = (
dbhome => $CONFIG->{SPMCNBL_ENVIRONMENT},
dbfile => [$CONFIG->{SPMCNBL_DB_TARPIT},
$CONFIG->{SPMCNBL_DB_ARCHIVE}],
txtfile => [$CONFIG->{SPMCNBL_DB_CONTRIB},
$CONFIG->{SPMCNBL_DB_EVIDENCE}],
umask => $CONFIG->{SPAMCANNIBAL_UMASK},
);
if (@ARGV && $ARGV[0] =~ /^\-R$/) { # set run recovery if -R
switch
$default{recover} = 1;
}
# make the DB files
my $dbp = new IPTables::IPv4::DBTarpit::Tools(%default);
$dbp->finish;
$dbp->closedb;
...
If I have included enough of the perl script, the problem is here. If
not, let me know. I added $dbp->finish, but that doesn't seem to work.
More information about the PLUG
mailing list