new Net::SMTP $smtp_server or die "Failed:$1";

##</code><code>##

  Net::SMTP::new('Net::SMTP', $smtp_server);