Portál AbcLinuxu, 23. dubna 2024 17:00


Dotaz: Email a Perl

5.1.2010 19:59 sdsdsd
Email a Perl
Přečteno: 185×
Odpovědět | Admin

Dobrý den,potřebuji pomoct s odesíláním emailu z přílohou.Ted pouze počítám počet emailu takto.Ale potřebuji na určitou adresu na seznam.cz poslat text a k tomu soubor.Poradí prosím někdo?

use Net::POP3;

my $hostname = "pop3.seznam.cz";

my $username = "email";

my $password = "heslo";

my $pop = Net::POP3->new($hostname) or die "Nelze se připojit. $!\n";

my $zprav = sprintf "%01d",$pop->login($username, $password);

Nástroje: Začni sledovat (1) ?Zašle upozornění na váš email při vložení nového komentáře.

Odpovědi

5.1.2010 21:02 pht | skóre: 48 | blog: pht
Rozbalit Rozbalit vše Re: Email a Perl
Odpovědět | | Sbalit | Link | Blokovat | Admin
To je zajímavé, že Net::POP3 Vás napadlo, a Net::SMTP ne. Pro přílohy budete potřebovat ještě nějak udělat MIME zprávu, např. pomocí MIME::Lite (který si mimochodem to SMTP umí zavolat sám).
In Ada the typical infinite loop would normally be terminated by detonation.
5.1.2010 21:39 sdsdsd
Rozbalit Rozbalit vše Re: Email a Perl

POP3 používám na počet zpráv v emailové schránce.

Ale MIME::LIte modul jsem stáhnul před týdnem a naistaloval,ale nevím jak to přesně funguje

6.1.2010 06:42 pht | skóre: 48 | blog: pht
Rozbalit Rozbalit vše Re: Email a Perl
In Ada the typical infinite loop would normally be terminated by detonation.
Amarok avatar 6.1.2010 11:54 Amarok | skóre: 33 | blog: blogoblog
Rozbalit Rozbalit vše Re: Email a Perl
Odpovědět | | Sbalit | Link | Blokovat | Admin
V nejhorsim se nemusi pouzit modul Net, ale primo napojit vlastni zdrojak na hotovy programek v Perlu SendEmail. Jen takovy napad.
GNUniverse - May the source be with you...

Založit nové vláknoNahoru

Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.