Mailing List Archive

Author: jm
Date: Fri Jan 5 05:59:09 2007
New Revision: 493035

URL: http://svn.apache.org/viewvc?view=rev&rev=493035
Log:
add some kind of rudimentary doco to Dumpmem

Modified:
spamassassin/trunk/masses/plugins/Dumpmem.pm

Modified: spamassassin/trunk/masses/plugins/Dumpmem.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/masses/plugins/Dumpmem.pm?view=diff&rev=493035&r1=493034&r2=493035
==============================================================================
--- spamassassin/trunk/masses/plugins/Dumpmem.pm (original)
+++ spamassassin/trunk/masses/plugins/Dumpmem.pm Fri Jan 5 05:59:09 2007
@@ -1,3 +1,15 @@
+# Dumpmem - dump SpamAssassin memory structures to disk after each message
+#
+# use as follows:
+#
+# MEMDEBUG=1 ./mass-check --cf='loadplugin Dumpmem plugins/Dumpmem.pm' \
+# [normal mass-check arguments]
+#
+# e.g.
+#
+# MEMDEBUG=1 ./mass-check --cf='loadplugin Dumpmem plugins/Dumpmem.pm' \
+# --net -n -o spam:dir:/local/cor/recent/spam/high.2007010*
+
package Dumpmem;
use strict;
use Mail::SpamAssassin;
@@ -10,6 +22,10 @@
my ($class, $mailsa) = @_;
$class = ref($class) || $class;
my $self = $class->SUPER::new($mailsa);
+ warn "Dumpmem plugin loaded";
+ if (!$ENV{'MEMDEBUG'}) {
+ warn "you forgot to set MEMDEBUG=1! are you sure you want that?";
+ }
bless ($self, $class);
return $self;
}