Select Code to Download

use Net::SMTP;
my $smtp_server='mail.webchalkboard.com';
my $smtp = Net::SMTP->new($smtp_server) or die "Failed:$!";

my $smtp = Net::SMTP->new('mail.webchalkboard.com') or die "Failed:$!"
+;