Net::SMTP

[anio at webgroup-bg.com]

sofia-pm-list - An official of Sofia's Perl hackers
anio at webgroup-bg.com
Zdraveite.
Nqkoi moje li da mi dade malko help za toq modul shtoto dosega ne sym go
izpolzval i neshto ne se polu4ava.Eto kak go pravq:

my $smtp = Net::SMTP->new($smtp_host,-Debug=>1) or die "Cant connect to
$smtp_host: $!\n";
 $smtp->recipient($recipient);
 $smtp->data();
 $smtp->datasend("To: $recipient\n");
 $smtp->datasend("\n");
 $smtp->datasend("$msg\n");
 $smtp->dataend();
 $smtp->quit;

Blagodarq predvaritelno.Dano ima nqkoi v tazi lista.