I've been using bogofilter to build up a Berkeley database of spam and
non-spam phrases. I'm trying to inspect the files (goodlist.db and
spamlist.db) using dbmopen, and basically nothing happens, except that two
very small files are created, in this case, spamlist.dir and spamlist.pag.
Code is below. What am I missing?
use warnings;
use strict;
my %h;
my $file = '/usr/home/qtikd/bogo_test/spamlist';
dbmopen(%h, $file, 0666);
while (my ($key,$val) = each %h) {
print $key, ' = ', unpack('L',$val), "\n";
}
dbmclose(%h);
_______________________________________________
Boston-pm mailing list
[EMAIL PROTECTED]
http://mail.pm.org/mailman/listinfo/boston-pm
