I uploaded a CGI script to a UNIX box that sends out HTML e-mail (at
least it used to). Yesterday, all of a sudden instead of displaying the
HTML it displays the HTML tags. I don't understand what happened,
everthing was working fine, I haven't changed anything. Can someone
please help me, I have attached the portion of the code, which sends the
HTML mail:

Thanks in advance for your help

Sheri

################################### Beginning of User E-mail Msg
############################################
#!/usr/local/bin/perl5 -w

use strict;
use CGI qw(:all);
use Net::Config qw(%NetConfig);
use Net::Domain qw(hostname hostfqdn hostdomain);
use Net::SMTP;


open(SENDMAIL, "|/usr/lib/sendmail -oi -t")
                        or die "Can't fork for sendmail: $!\n";
print SENDMAIL <<"EOF";
From: sales\@elsitech.com
To: $usrEmail
Subject: Visual Intercept Evaluation Guide
Content-type: text/html\n\n

<body>
<p><img src=\"http://$wbSvr/downloads/images/evaluationheader.gif\"
alt=\"evaluationheader.gif (4798 bytes)\" width=\"750\"
height=\"83\"></p>                 
<table border=0 cellpadding=0 cellspacing=0 width=750>
<tr>
<p><font size=2 face=\"Verdana, Arial, Helvetica, sans-serif\"><b>Thank
you for your interest in the Visual Intercept Incident Management
System. Based
on the preferences you selected:</b></font></p>
<UL>
        $strPrfDsk
        $strPrfMSdev
        $strPrfMSoff
        $strPrfWDv
        $strPrfWBs
        $strPrfPrj
        $strPrfSDK
</UL>
<p><font size=2 face=\"Verdana, Arial, Helvetica, sans-serif\"><b>We
recommend that you download and evaluate the following products.  This
evaluation will expire 30 days after installation.</b></font></p>
<p><img src=\"http://$wbSvr/customer/images/vieLine0.gif\"
alt=\"vieLine0.gif (1045 bytes)\" width=\"750\" height=\"20\"></p>

<p><A NAME=\"VIEE\"><img
src=\"http://$wbSvr/customer/images/viee_hdr.gif\" alt=\"viee_hdr.gif
(1277 bytes)\" width=\"275\" height=\"20\"></A></p>                 
<table border=0 cellpadding=0 cellspacing=0 width=750>
        <tr>
        <br>
        <td width=100 valign=top><img
src=\"http://$wbSvr/customer/images/enterprise_box.gif\"
                alt=\"enterprise_box.gif (9880 bytes)\" width=\"152\"
height=\"171\"></td>
        <td width=10>&nbsp;</td>
        <td width=640>             
        <font size=2 face=\"Verdana, Arial, Helvetica, sans-serif\">You
will want to download and install <b>Visual Intercept Enterprise:
        </b><a
HREF=\"http://support.elsitech.com/anon-ftp/software/viee146elsi.exe\"> 
                viee146elsi.exe</a>. This package installs the core
components of the Visual Intercept 
                Incident Management System:</font>
                        <UL>
                        <LI><font size=2 face=\"Verdana, Arial,
Helvetica, sans-serif\">The <b>Visual Intercept Manager</b> provides a
powerful and intuitive tool for working 
                                with your incident management data over
your network.</font></LI>
                        <LI><font size=2 face=\"Verdana, Arial,
Helvetica, sans-serif\">The <b>Visual Intercept Administrator</b> will
allow you to create new Visual Intercept 
                                users, administrate security groups, and
define workflow rules.</font></LI>
                        <LI><font size=2 face=\"Verdana, Arial,
Helvetica, sans-serif\">The <b>Visual Intercept database files</b> will
allow you to use a pre-configured MS 
                                Access database with Visual Intercept or
run a script to create a database in SQL Server, Oracle, 
                                Sybase or Fox Pro.</font></LI>
                        <LI><font size=2 face=\"Verdana, Arial,
Helvetica, sans-serif\">The <b>Visual Intercept Wizard</b> will allow
you to create a complete Visual Intercept 
                                Project hierarchy in one
setting.</font></LI>
                        <LI><font size=2 face=\"Verdana, Arial,
Helvetica, sans-serif\">The <b>Visual Intercept Services Manager</b>
allows you to create Visual Intercept 
                                services for e-mail notification and
synchronization with Visual Source Safe databases.</font></LI>
                        <LI><font size=2 face=\"Verdana, Arial,
Helvetica, sans-serif\"><b>Visual Intercept Studio</b> provides simple
and easy access to your 
                                incident management data from Microsoft
development environments and Microsoft 
                                Office 2000 products.</font></LI>
                        </UL>
        <p><font size=2 face=\"Verdana, Arial, Helvetica,
sans-serif\">Please refer to the 
        <b><i><a
HREF=\"http://support.elsitech.com/techsupport/GSGuide/GSIndex.asp\">Vis
ual 
                Intercept Enterprise Getting Started Guide</a></i></b>,
which contains information about 
                system requirements, installation, and an overview of
the Visual Intercept
                Enterprise Incident Management System.</font></p>
        </td>
        </tr>
        </table>
$imgVieLine1
<A NAME=\"VIWB\">$imgWbSvr</A>
<table border=0 cellpadding=0 cellspacing=0 width=750>
        <tr>
        <td width=130 valign=top>$imgWbBx</td>
        <td width=640>   
                <font size=2 face=\"Verdana, Arial, Helvetica,
sans-serif\">$strWebBase1
                $strWebBase2
                $strWebBase3
                $strWebBase4
                $strWebBase5
                $strWebBase6
                $strWebBase7
                $strWebBase8</font>
        </td>
        </tr>
</table>
$imgVieLine2
<A NAME=\"VIWD\">$imgWbDev</A>
<table border=0 cellpadding=0 cellspacing=0 width=750>
        <tr>
        <td width=130 valign=top>$imgWbBx2</td>
        <td width=640>   
         <font size=2 face=\"Verdana, Arial, Helvetica,
sans-serif\">$strWebDev1
        $strWebDev2
        $strWebDev3
        $strWebDev4
        $strWebDev5</font>
        </td>
        </tr>
</table>
$imgVieLine3
<A NAME=\"VIWD\">$imgWbDev2</A>
<table border=0 cellpadding=0 cellspacing=0 width=750>
        <tr>
        <td width=130 valign=top>$imgWbBx3</td>
        <td width=640>   
        $strWbBaseFal2
        $strWbBaseFal3
        $strWbBaseFal4
        $strWbBaseFal5
        $strWbBaseFal6
        $strWbBaseFal7</font>
        </td>
        </tr>
</table>
$imgVieLine4
<A NAME=\"VIPrj\">$imgViePrj</A>
<table border=0 cellpadding=0 cellspacing=0 width=750>
        <tr>
        <td width=130 valign=top>$imgPrjBx</td>
        <td width=640>   
        <font size=2 face=\"Verdana, Arial, Helvetica,
sans-serif\">$strMSPrj1
        $strMSPrj2
        $strMSPrj3
        $strMSPrj4
        $strMSPrj5
        $strMSPrj6
        $strMSPrj7</font>
        </td>
        </tr>
</table>
$imgVieLine5
<A NAME=\"VISDK\">$imgVieSDK</A>
<table border=0 cellpadding=0 cellspacing=0 width=750>
        <tr>
        <td width=130 valign=top>$imgSDKBx</td>
        <td width=640>   
        <font size=2 face=\"Verdana, Arial, Helvetica,
sans-serif\">$strSDK1
        $strSDK2
        $strSDK3
        $strSDK4
        $strSDK5
        $strSDK6
        $strSDK7</font>
        </td>
        </tr>
</table>
<p><img src=\"http://$wbSvr/customer/images/vieLine0.gif\"
alt=\"vieLine0.gif (1045 bytes)\" width=\"750\" height=\"20\"></p>

<table border=0 cellpadding=0 cellspacing=0 width=750>
<p><font size=2 face=\"Verdana, Arial, Helvetica, sans-serif\">We would
like to thank you again for your interest in the Visual Intercept
Incident Management
System. If you have technical questions during your evaluation that are
not covered by this e-mail or by 
the documentation, please send an e-mail with your questions to:
<a HREF=\"mailto:support\@elsitech.com\">support\@elsitech.com</a>. If
you have questions related to sales 
or licensing, please send an e-mail to <a
HREF=\"mailto:sales\@elsitech.com\">sales\@elsitech.com</a>.</font></p> 
<br>
<TABLE border=0 cellspacing=0 cellpadding=0 width=750 height=22>
  <TR>
        <TD><img src=\"http://$wbSvr/home/images/bottomheader.gif\"
alt=\"bottomheader.gif (436 bytes)\" width=\"573\" height=\"22\"></TD>
        <TD><a HREF=\"mailto:info\@elsitech.com\"><img
src=\"http://$wbSvr/home/images/bottom_eml_hdr.gif\" alt=\"E-mail:
info\@elsitech.com\" width=\"177\" height=\"22\" border=\"0\"></a></TD>
</tr>
</table>

</table>
</body></html>
EOF
close(SENDMAIL)     or warn "sendmail didn't close nicely";


##################################### End of User E-mail Msg
####################################################

_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

Reply via email to