Script pro poslani Emailu s pripojenym souborem

[Ales Turai]

A bude to skutecne fungovat v Perl scriptu pri
pouziti sendmail?

Klasicky usek Perl codu pro posilani emailu je nasledukici:

if (open (MAIL,"|$MailProgram")) {
  print MAIL "To: $EmailTo\n";
  print MAIL "From: $EmailFrom\n";
  print MAIL "Subject: $EmailSubject\n";
  print MAIL "$EmailBody";
  close MAIL;
 };


Lze to tam jedoduse nejak pridat? Prosim, ocente financne,
za kolik mi 100% fungujici kod muzete poslat.


Diky moc,
Ales Turai


Martin Caslavsky wrote in message
>Zdravim!
>
>Osobne vam doporucuju vybodnout se na podobne obludne moduly (ktere
vyzaduji
>dalsi moduly, jsou navic pekne objektove,...), protoze i kdyz usetrite par
>radku, ktere napisete, kdyz vite jak to funguje, vas skript nabobtna o
>stovky nesmyslnych bajtu stejne nesmyslnych modulu.
>
>Elektronicka posta jako takova umi prenaset pouze text, nicmene napr.
pomoci
>MIME muzete mit zpravu slozenou z vic casti (muzete pridat soubor).
>Obecne takova zprava vypada tak, ze ma v hlavicce
>Content-type: multipart/mixed;
>boundary="spousta_nesmyslnych_znaku_jako_oddelovac"
>a v tele pak vypada nejak
>--spousta_nesmyslnych_znaku_jako_oddelovac
>Content-type: xxxx
>dalsi-hlavicky: yyyy
>
>telo
>--spousta_nesmyslnych_znaku_jako_oddelovac
>Content-type: xxxx
>dalsi-hlavicky: yyyy
>
>telo
>--spousta_nesmyslnych_znaku_jako_oddelovac--
>
>Prectete si RFC-1521, trosku zaexperimentujte se sobe zasilanou MIME
zpravou
>a myslim, ze za chvilku neni co resit :)
>
>
>S pozdravem        Martin Caslavsky
>
>
>>Zdravim vsechny,
>>
>>Mam takovy problem. Potrebuji Perl Script ktery muze
>>pripojit soubor k Emailu a odeslat ho.  Lze to provest nejak
>>"jednoduse" s sendmail programem bez pouzivani MIME?
>>
>>Ale tusim ze musim pouzit MIME pro odeslani souboru s
>>prilozenym souborem. Nasel jsem Automail Lite script:
>>http://www.datatrendsoftware.com/automail_lite.html
>>
>>vypada vskutku dobre, ale autor rika ze musi byt
>>nainstalovany MIME::TOOLS modul. Stahl jsem si
>>posledni verzi tohoto modulu a zkusil jsem ho nainstalovat...
>>Ale tento modul vyzaduje dalsi moduly aby mohl fungovat...
>>napr. Mail/Internet.pm ...  a nikde jsem Mail/Internet.pm
>>nenasel...
>>
>>
>>Skutecne potrebuji tento Perl script pro odeslani emailu
>>s prilozenym souborem velmi nutne...
>>
>>
>>Muze mi nekdo nejak pomoct?
>>
>>Kazdopadne diky,
>>Ales Turai