in reply to mail servers
use Net::SMTP; my $smtp = Net::SMTP->new("10.10.100.200) || die "Couldnt reach the em +ail server\n"; $smtp->mail( "test\@test.ie" ); $smtp->to( "receiver\@helpme.com" ); $smtp->data(); $smtp->datasend("To: receiver\@helpme.com\n"); $smtp->datasend("From: test\@test.ie\n"); $smtp->datasend("Subject: blah blah blah\n"); $smtp->datasend("\n"); $smtp->datasend("lots of blah blah blah\n"); $smtp->dataend(); $smtp->quit();
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: mail servers
by marto (Cardinal) on Apr 07, 2006 at 08:41 UTC |