MIMEDefang Script1 Modification

MIMEDefang Script Modification by Jeffrey Thompson:

Don't Spamassassin messages larger than 200k
Identify Spam in the header with: X-Spam-Status: Yes (or No). If you view the user's email client setup you can see how to use this header information to automatically route your Spam to a Deleted Spam folder
When Spam is identified, if it's bounced I quarentine the entire message.
If the MIMEDefang Admin (the MIMEDefanger) wishes to receive email notifications of the quarantined messages uncomment the send_quarantine_notifications() section below.

Outright bounce email if it's obviously Spam (Spamassassin rating of > 10 for me)

If the Spam has a Spamassassin rating >= 5 or <= 10 then I identify it as Spam and let the user's client deal with it

Next I do some Evil E-Mail filtering and bounce emails that are deemed to indeed be, Evil

# Thanks Martin Bene for helping me get started with this script
#
sub filter_begin {

    my $bounce = "no";

   # Don't run SA against messages bigger than 200k
    if ((-s "./INPUTMSG") <= (200 * 1024)) {
        my($hits, $req, $names, $report) = spam_assassin_check();
        $SAReport = $report;
        if ($hits >= $req) {
            action_add_header("X-Spam-Warning", "SpamAssassin says this message is SPAM");
            action_add_header("X-Spam-Status", "Yes, hits=$hits required=$req"); 
            action_add_header("X-Spam-Report","$report");
        } else {
            action_add_header("X-Spam-Status", "No");
        }
        # if we're quite confident it actually IS spam, just bounce it
        if ($hits > 10) {
          $bounce = "yes";
          action_quarantine_entire_message();
          action_bounce("Message seems to be spam, rejected");
        }
    }
    # if we haven't bounced the msg yet lets do some more tests
    if($bounce eq "no") {
        open(IN, "<./HEADERS");
        while() {
            if(/beleskari/i) {
                $bounce = "yes";
                action_quarantine_entire_message();
                action_bounce("Porn not welcome here");
                last;
            }
        }
#	if($bounce eq "yes") {
#	   send_quarantine_notifications();
#       } 
        close(IN);
    }
}

It's a start :-) I'm learning too. Feel free to suggest improvements or modifications.