----- Original Message ----- 
From: "Sharon Tiroff" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, February 19, 2001 3:54 PM
Subject: Sendmail Syntax error


> Hi I am new to Perl CGI programming and I am receiving this syntax
> error:
> syntax error at C:\Inetpub\wwwroot\cgi-bin\form.cgi line 111, near ") {"
> ________________________________________________________________________
> ___________
> 
> Here's the code:
> 
>   $Mail::Sendmail{Smtp} =
> 'special_server.for-this-message-only.domain.com';
>   $Mail::Sendmail{'X-custom'} = 'My custom additionnal header';
>   $Mail::Sendmail{'mESSaGE : '} = "The message key looks terrible, but
> works.";
>   # cheat on the date:
>   $Mail::Sendmail{Date} = Mail::Sendmail::time_to_date( time() - 86400
> ), 
^^^ How about this?
>   if ( sendmail %Mail::Sendmail ) { print "Mail sent OK.\n" } #line
> 111
>   else { print "Error sending mail: $Mail::Sendmail::error \n" }
> 
>   print "\n\$Mail::Sendmail::log says:\n", $Mail::Sendmail::log;
> ________________________________________________________________________
> _________________
> 
> Does anyone see my error? This is the example code from the Sendmail.pm.
> 
> Any help would be appreciated.
> Thanks again!
> 
> Sheri
> _______________________________________________
> Perl-Win32-Web mailing list
> [EMAIL PROTECTED]
> http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
> 


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

Reply via email to