Net::SMTP

Hi,

I use Net::SMTP as SMTP client in a script. I've just found out that
sometimes SMTP servers send back more than one line as an answers.

...
RCPT TO: <*****@*****.***>
550 5.1.1 <*****@*****.***>: Recipient address rejected: User unknown in
relay recipient table
421 4.7.0 *****.*** Error: too many errors

In this case the Net::SMTP is raising an exception with the 421 message and
there's no way getting the real message (with the SMTP code 550). Or is
there? How can I get the 550 Recipient address rejected message?