Hi Sir
I want my program to send information via email i am using Perl here is my code:
sub send_mail {
use OLE;
$h = new HTTP::Headers
Date => 'Thu, 03 Feb 1994 00:00:00 GMT',
Content_Type => 'text/html; version=3.2',
Content_Base => 'http://www.musicasia.ca/';
$DevMailer = CreateObject OLE 'Geocel.Mailer';
$DevMailer->AddServer ("mail.musicasia.ca",25); $DevMailer->AddRecipient ("[EMAIL PROTECTED]","Anees Khokhar"); $DevMailer->{FromName} = "Geocel Support";
$DevMailer->{FromAddress} = "[EMAIL PROTECTED]"; $DevMailer->{Subject} = "Subscription"; $DevMailer->{Body} = "Message Body\r\nLine 2\r\n";
$DevMailer->{Body} = $DevMailer->{Body} . "Line 3\r\n";
$success = $DevMailer->Send(); if(! $success) {
print "Could not send message, please check C:\\TEMP\\GEOCEL.LOG \n";
print "for more information.\n";
}
}
as soon as i hit the send button it gives me this error:
CGI Error
The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:
Please if you can help me or post this so it could help others. I have pl script in my cgi-bin
_________________________________________________________________
MSN Premium helps eliminate e-mail viruses. Get 2 months FREE* http://join.msn.com/?pgmarket=en-ca&page=byoa/prem&xAPID=1994&DI=1034&SU=http://hotmail.com/enca&HL=Market_MSNIS_Taglines
