[Mimedefang] How to code Remove all attachment to two RCPT

[Scott Ostrander]

I have been asked to have all attachments removed from mail going to two users.
I can find the recipients (userA and B ) using the statement below.

foreach $recip (@Recipients) {
            if ($recip =~ /^<?userA|^<?userB\@/i) {
		What goes here?;
            }   
        }

But how to delete ALL attachments?
Not just bad filesnames.
This is being done because these two accounts are auto archived and we are hitting size limits.
So this will be a plain text archive.

TIA 
Scott O