LinuxQuestions.org - sending html text message with zip file attachment; Content-Type: multipart/mixed

My perl script attempts to send an email message in html
format with a .zip attachment. This runs on linux and the
html part works fine. It's the zip file attachment that I'm having trouble with. Is it something wrong with the way I've set up my boundary? Any ideas? Thanks!

...
...
my $boundary = "_boundarystring";
chdir "/tmp";
open ( MAIL, "|/usr/lib/sendmail -t" );

print MAIL <<"END_OF_MAIL";
FROM: $reply_to
TO: $ENV{'MAIL_LST'}
REPLY-TO: $reply_to
SUBJECT: $scriptname for $product $env was $success_string
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="$boundary"
Content-Type: text/html
<html>
<body>
Host: $te_host 
 
Product: $product 
 
Environment: $env 
 
 
Stats zip file has been created on $te_host at: 
 
/tmp/$stats_file 
</body>
</html>
--$boundary
Content-Type: application/zip
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="$stats_file"
END_OF_MAIL
print MAIL `/usr/bin/uuencode $stats_file $stats_file`;
print MAIL "--$boundary--\n";
close MAIL;
----------------------------------------------------------------

The html section is rendered as it should be, but the .zip attachment is not:

Host: linuxqa1.dev.oclc.org

Product: FirstSearch

Environment: Active_EnvC

Stats zip file has been created on linuxqa1.dev.oclc.org at:

/tmp/FirstSearch_Active_EnvC_0606220017_stats.zip
--_boundarystring Content-Type: application/zip Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="FirstSearch_Active_EnvC_0606220017_stats.zip" begin 644 FirstSearch_Active_EnvC_0606220017_stats.zip M4$L#!`H``````(%2QS0````````````````%`!4`,C`P-B]55`D``Y'@AD1: M"YI$57@$`+!AL&%02P,$"@``````05G/-`````````````````@`%0`R,#`V M+S`V+U54"0`#27B11%H+FD15>`0`L&&P85!+`P0*``````"!4L`0`L&&P8:OO56U\ ML\!Z@>;\$I&BU#3#X@(SO934,KW\Y)QDO?RB]`8F]QHF-D;N=5<]4AM9?"Q^ M>2WD@_+;&E@""84I1:7-S#9VALI&=H;J)G9*!G:&!L(-/`%92:FU^2ZI%? M7((N"P!02P,$"@``````0&;(-```````````````