It's a horrible script.

• No use strict or -wT
• No use CGI to handle CGI parameter parsing
• And there are module on CPAN that will handle the creation and sending of MIME emails MIME::Lite for example

Don't try to manipulate this file. Throw it away and start again.

--
<http://www.dave.org.uk>

"The first rule of Perl club is you do not talk about Perl club."
-- Chip Salzenberg