This queue is for tickets about the Net-SMTP-TLS CPAN distribution.

Report information
The Basics
Id:
83480
Status:
new
Priority:
Low/Low
Queue:

People
Owner:
Nobody in particular
Requestors:
icrew [...] berkeley.edu
Cc:
AdminCc:

BugTracker
Severity:
(no value)
Broken in:
(no value)
Fixed in:
(no value)



Subject: Patch for lack of support for multi-line greetings in Net::SMTP::TLS
Date: Wed, 20 Feb 2013 06:56:14 -0800
To: bug-Net-SMTP-TLS@rt.cpan.org
From: Ian Crew <icrew@berkeley.edu>
Hello:

As Mike reported in bug id 81972, Net::SMTP::TLS doesn't support multi-line greetings.

In Googling around, I discovered that someone has posted a simple patch for how to fix this.  It's up at http://tonyborries.com/techblog/cpanel-exim-and-perls-netsmtptls/, and copy-and-pasted below, in case rt.cpan.org doesn't allow URLs to be included in bug reports:

$ diff Net-SMTP-TLS-0.12/lib/Net/SMTP/TLS.pm  Net-SMTP-TLS-0.12-fixed/lib/Net/SMTP/TLS.pm 
117,121c117,126
# read the line immediately after connecting
my ($rsp,$txt) = $me->_response();
if(not $rsp == 220){
croak "Could not connect to SMTP server: $host $txt\n";
}
---
# read the line(s) immediately after connecting
my $rsp;
my $txt;
my $more;
do {
($rsp,$txt,$more) = $me->_response();
if(not $rsp == 220){
croak "Could not connect to SMTP server: $host $txt\n";
}
} while ($more eq '-');

I hope this patch can be rolled into the main Net::SMTP::TLS code at some point.  It seems to work perfectly for me....

Thanks,

Ian


This service runs on Request Tracker, is sponsored by The Perl Foundation, and maintained by Best Practical Solutions.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.