Thanks for the reply. (Boy do I feel sheepish) I was going to post just the bit I was having problems with, but I decided to include it all and ask for input...
I really appreciate all the monks who took the time to read the code. Thank you for all your input on things like the mime header, Mail::Sendmail Bcc:, $", local and more.