# similar untainting for all other user input here, then...

##</code><code>##

        print MAIL "Subject: $subject\n\n";

##</code><code>##

$subject = "Nice subject\nBcc: john@doe.com, jane@doe.com... ";

##</code><code>##

From: $name
To: $sendto
Subject: Nice subject
Bcc: john@doe.com, jane@doe.com...

Message: $message