+ store "=spam" if ($_=mimehead(body_first())->mime_attr("Content-Type.charset")) && /^big5/i;
+ };
+
+ # spam detection
+ return if did sub {
+ local $store_profile="silent";
+ local $_;
+ store "=spam".($_ eq 1 ? "" : ";$_") if $_=razor2();
+ };
+ return if did sub {
+ local $store_profile="silent";
+ local $_;
+ store "=spam" .";$_","log" if $_=dnsbl '.relays.ordb.org.' ,1; # all hosts
+ store "=spam" .";$_","log" if $_=dnsbl '.blackholes.mail-abuse.org.' ,1; # all hosts
+ # we don't check all hosts as they can be "dialup" category, FIXME: check for it
+ store "=spam" .";$_","log" if $_=dnsbl '.blackholes.five-ten-sg.com.',0; # just first
+ # I don't send viruses but viruses propagate mails of mine
+ store "=spam" if headeris "X-Mailer",'ravmd/8.3.2';