Net::SMTP=GLOB(0x180f4a0)>>> RCPT TO:<joesmith@foo.com>
Net::SMTP=GLOB(0x180f4a0)<<< 553 Sorry, that domain isn't in my list of allowed rcpthosts.
Net::SMTP=GLOB(0x180f4a0)>>> DATA
Net::SMTP=GLOB(0x180f4a0)<<< 503 You must send RCPT TO: first

##</code><code>##

use Net::SMTP_auth;
$smtp = "smtpout.secureserver.net:3535";
$username = 'joesmith@foo.com';
$password = 'gsx5f3d3';
$smtp = Net::SMTP_auth->new("$smtp");
$smtp->auth('PLAIN', $username, $password);