Hi all,
Carrying on from my previous question (and the solutions you all put forward),
it seems I got a most of it sorted, but ran into the problem that my company
has port 25 block, and so the SMTP Service would be the emails I was trying to
send into a queue and they would never be sent.
We now have a work around, but was wondering if the Net::SMTP Module allows us
to provide SMTP Authentication (username and password)? I have found auth()
method, but am not sure if this is the correct method for what I want to
achieve, or if it is the correct method, where exactly do I play it in my code
(which is as follows...)
use Net::SMTP;
my $smtp = Net::SMTP->new('esr.org.uk',
Timeout => 30, Debug => 1, LocalPort => 119) or die "Couldn't connect to
server; $!";
$smtp->mail('[EMAIL PROTECTED]');
$smtp->to('[EMAIL PROTECTED]');
$smtp->data();
$smtp->datasend("To: [EMAIL PROTECTED]");
$smtp->datasend("From: [EMAIL PROTECTED]");
$smtp->datasend("\n");
$smtp->datasend("Error Message");
$smtp->dataend();
$smtp->quit; # Close SMTP connectin
Thanks
Tryst
The views expressed in this e-mail are not necessarily the views of AssetCo
Group Limited,
its directors, officers or employees make no representation or accept any
liability for its accuracy or completeness unless expressly stated to the
contrary.
This e-mail, and any attachments are strictly confidential and intended for the
addressee(s) only.
The content may also contain legal, professional or other privileged
information. Unless expressly
stated to the contrary, no contracts may be concluded on behalf of AssetCo
Group Limited by means of
e-mail communication. You may report the matter by calling us on +44 (0)118 906
8000.
Please ensure you have adequate virus protection before you open or detach any
documents from this
transmission. AssetCo Group Limited does not accept any liability for viruses.
AssetCo Group Limited
is registered in England: Company number: 4450947
Registered Office: Davidson House, Forbury Square, Reading, Berkshire RG1 3GA
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
