For someone: untested should work.
use Mail::Sender;
sub sendmail { my ($subject,$from, $rep, $to, $cc) = (@_);
my $sender = new Mail::Sender {
smtp => $SMTP_SERVER_NAME,
from => $MAIL_RETURN_ADDRESS,
};
die $Mail::Sender::Error if not ref $sender;
$_ = $sender->MailMsg({
$Bill Luebkert in <[EMAIL PROTECTED]>:
> [EMAIL PROTECTED] wrote:
>
> > I tried the following to use SMTP to send email:
> >
> >use Net::SMTP;
> >$optServer = 'luxn.com';
> >$optTo = "[EMAIL PROTECTED]";
> >
> > Can't call method "mail" on an undefined value at
> > mailtest.pl line
On 06/06/2002 22:00:09 Yi Zhang wrote:
>I tried the following to use SMTP to send email:
>
>
>use Net::SMTP;
>$optServer = 'luxn.com';
>$optFrom = "[EMAIL PROTECTED]";
>$optTo = "[EMAIL PROTECTED]";
>$smtp = Net::SMTP -> new ("luxn.com");
>$smtp -> mail($optFrom);
[snip rest of script]
>What m
http://www.faqs.org/rfcs/rfc2487.html
-Original Message-
From: Geoff Collins [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, June 12, 2002 1:38 PM
To: [EMAIL PROTECTED]
Subject: RE: Send email in ActivePerl using SMTP
While thinking on this topic
Does anyone know how to achieve
While thinking on this topic
Does anyone know how to achieve Authentication when connecting to an
SMTP server?
Thanks,
--geoff
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of
Toby Stuart
Sent: Wednesday, 12 June 2002 03:30
To: '[EMAIL PROTECTED]'
S
robably a
few people here who can put me straight,
Regards
Marty
- Original Message -
From: "Morse, Richard E." <[EMAIL PROTECTED]>
To: "'$Bill Luebkert'" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Thursda
From: [EMAIL PROTECTED]
> I tried the following to use SMTP to send email:
>
>use Net::SMTP;
>$optServer = 'luxn.com';
>$optFrom = "[EMAIL PROTECTED]";
>$optTo = "[EMAIL PROTECTED]";
>$smtp = Net::SMTP -> new ("luxn.com");
>$smtp -> mail($optFrom);
> ...
>
> It say:
>
>
$Bill Luebkert [mailto:[EMAIL PROTECTED]] wrote:
> [EMAIL PROTECTED] wrote:
>
> > I tried the following to use SMTP to send email:
> >$smtp = Net::SMTP -> new ("luxn.com");
> >$smtp -> mail($optFrom);
> >
> > Can't call method "mail" on an undefined value at
> > mailtest.pl line 8
> >
[EMAIL PROTECTED] wrote:
> I tried the following to use SMTP to send email:
>
>
>use Net::SMTP;
>$optServer = 'luxn.com';
>$optFrom = "[EMAIL PROTECTED]";
>$optTo = "[EMAIL PROTECTED]";
>$smtp = Net::SMTP -> new ("luxn.com");
>$smtp -> mail($optFrom);
>$smtp -> to ($