Dawid Widyna pisze:
my $smtp = Net::SMTP->new('smtpauth.crowley.pl', Hello => 'siec.piko.krakow.pl', Debug=> 1,); $smtp -> auth('login', 'pass') || die "Autoryzacja nie powiodla sie!\n"; $smtp -> mail('platnosci@domena');
nie nam sie na perlu ale to mi lekko nie pasuje... ale tu lepiej by bylo podac cos co naprawde istnieje,a jeszcze lepiej to dane konta do ktorego sie logujesz.
$smtp -> to('<"widynek"@o2.pl>');
a tutaj moze bez tych cudzyslowi
$smtp -> data($msg); $smtp -> quit;
Niestety nie działa - wygląda na to, że nie uwierzytelnia się prawidłowo na serwerze SMTP (dostaję błąd: Net::SMTP=GLOB(0x83bfe4c)<<< 554 5.7.1 widynek@o2.pl: Relay access denied
moze warto by bylo jeszcze jakies "czekaczki" dac (ma czekac na potwierdznei koendy co sie lwasnie wyslalo) aby to bylo odpowienio z protokolem zgodne ale nie wiem moze perl ma to juz w tym module wbudowane
_______________________________________________ lms mailing list lms@lists.lms.org.pl http://lists.lms.org.pl/mailman/listinfo/lms