Net::SMTP

[Vulcho Nedelchev]

sofia-pm-list - An official of Sofia's Perl hackers
Vulcho Nedelchev <kumcho at vulcho.com>
На чт, 2004-03-25 в 13:08, anio at webgroup-bg.com записа:

Zdrawej,
spored men problema e w nowite redowe koito pishesh na SMTP-to.
Towa e opisano w dokumentaciqta i trqbwa  wmesto "\n" da printish
"\r\n" i wsichko shte e  OK;

> 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.
-- 
perl -e '$D="-";$N="\n";print $D x30,$N,(join $N, at INC),$N,$D x30,$N;'
--------------------- or point your browser at http://www.vulcho.com/