Help for this page
new Net::SMTP $smtp_server or die "Failed:$1";
Net::SMTP::new('Net::SMTP', $smtp_server);