> Does anybody know how to send email via a perl script on a 
> win32 system?
> 
> Thanks.
> 
I use the Mail::Mailer module from CPAN


use Mail::Mailer;
$mailer = Mail::Mailer->new("smtp","your.smtp.mail.host");
$mailer->open({ From   => '[EMAIL PROTECTED]',
                To     => '[EMAIL PROTECTED]',
                Subject=> 'what you want to say',
              });

print $mailer "$body";
$mailer -> close;

Hope this helps

Ron

Reply via email to