³ØŸÀÌ :: Eudora.

TIE :: EUDORA´Â EURDORA »ç¼­ÇÔ ÆÄÀÏÀÇ ÀüÀÚ ¸ÞÀÏ, Àбâ / ¾²±â ÀüÀÚ ¸ÞÀÏÀ» ÀÎÄÚµù / µðÄÚµù ÇÒ ¼öÀÖ´Â PERL ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

³ØŸÀÌ :: Eudora. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Software Diamonds
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~softdia/Archive-TarGzip-0.03/lib/Docs/Site_SVD/Archive_TarGzip.pm

³ØŸÀÌ :: Eudora. ű×


³ØŸÀÌ :: Eudora. ¼³¸í

TIE :: Eudora´Â ÀüÀÚ ¸ÞÀÏÀ» ÀÎÄÚµù / µðÄÚµùÇÏ´Â Perl ¸ðµâ·Î Eudora »ç¼­ÇÔ ÆÄÀÏ¿¡¼­ ÀüÀÚ ¸ÞÀÏÀ» ÀÐÁö / ¾²±âÇÕ´Ï´Ù. ³ØŸÀÌ :: Eudora´Â ÀüÀÚ ¸ÞÀÏÀ» ÀÎÄÚµù / µðÄÚµù ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Eudora »ç¼­ÇÔ ÆÄÀÏ¿¡¼­ ÀüÀÚ ¸ÞÀÏ Àбâ / ¾²±â #### # ¼­ºê ·çƾ ÀÎÅÍÆäÀ̽º # $ encoded_email = decode_record ($ mailbox_email); @email = decode_field ($ encoded_email); $ encoded_email = encode_field (@email); $ mailbox_email = encode_record ($ encoded_email); ##### # °´Ã¼ ÀÎÅÍÆäÀ̽º # $ eudora = tie :: form-> new (@Options); $ encodeed_email = $ eudora-> decode_record ($ ·¹ÄÚµå); @Email = $ Eudora-> decode_field ($ encoded_email); $ encoded_email = $ eudora-> encode_field (@email); $ mailbox_email = $ eudora-> encode_record ($ encodeed_email); $ mailbox_email = $ eudora-> get_record (); $ success = $ eudora-> put_record ($ mailbox_email); #### # ÆÄÀÏ ¼­ºê ·çƾÀ» »ç¿ëÇÏ¿© Eudora »ç¼­ÇÔ ÆÄÀÏÀ» ¾²°Å³ª ÀнÀ´Ï´Ù * »ç¼­ÇÔ, 'Tie :: Eudora'; ¿ÀÇ »ç¼­ÇÔ, '>', $ MBX; »ç¼­ÇÔ Àμâ @Mailbox; ´Ý±â »ç¼­ÇÔ; ¿ÀÇ »ç¼­ÇÔ, '¿ä±¸ »çÇ× : ¡¤ Perl.


³ØŸÀÌ :: Eudora. °ü·Ã ¼ÒÇÁÆ®¿þ¾î

Mail :: Çдë

Mail :: Abuse´Â ±âŸ ³²¿ë ºÒ¸¸¿¡ ±¸¹® ºÐ¼® ¹× ´ëÀÀÇÏ´Â µ¥ µµ¿òÀ̵Ǵ Perl ¸ðµâÀÔ´Ï´Ù. ...

161

´Ù¿î·Îµå