Help for this page

Select Code to Download


  1. or download this
    my $smtp = Net::SMTP->new('$my_host');
die "error connecting to $my_host" unless defined $smtp;
...
$smtp->mail($ENV{USER}) or die "error issuing MAIL command: ".$smtp->m
+essage();

...
  2. or download this
    telnet mysmtphost.com 25
HELO myip
...
blah blah
.