À̸ÞÀÏ :: MIME.

½¬¿î MIME ¸Þ½ÃÁö ÆĽÌ
Áö±Ý ´Ù¿î·Îµå

À̸ÞÀÏ :: MIME. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Ricardo Signes
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~rjbs/

À̸ÞÀÏ :: MIME. ű×


À̸ÞÀÏ :: MIME. ¼³¸í

À̸ÞÀÏ :: MIMEÀº MIME ÀÎÄÚµù µÈ ¸Þ½ÃÁö¸¦ ó¸®Çϱâ À§ÇØ À̸ÞÀÏ :: ´Ü¼ø ¸ðµâÀÇ È®ÀåÀÔ´Ï´Ù. ¹®ÀÚ¿­·Î ¸Þ½ÃÁö¸¦ »ç¿ëÇÏ°í ±¸¼º ºÎºÐÀ¸·Î ºÐÇÒÇÏ¸ç ¸Þ½ÃÁöÀÇ ´Ù¾çÇÑ ºÎºÐ¿¡ ¾×¼¼½º ÇÒ ¼ö ÀÖ½À´Ï´Ù. Çì´õ´Â MIME ÀÎÄÚµù¿¡¼­ µðÄÚµùµË´Ï´Ù .SNOPSIS »ç¿ë À̸ÞÀÏ :: MIME; MY $ PARSED = À̸ÞÀÏ :: MIME-> »õ ($ ¸Þ½ÃÁö); @parts = $ Parsed-> ºÎÇ°; # À̸ÞÀÏ :: MIME °´Ã¼µµ À̸ÞÀÏÀÌ µÉ °ÍÀÔ´Ï´Ù. MY $ DECODED = $ PARSED-> º»Ã¼; $ NON_DECODED = $ PARSED-> BODY_RAW; $ CONTONT_TYPE = $ PARSED-> CONTONT_TYPE; ¶Ç´Â ... À̸ÞÀÏ :: MIME :: Creator; IO :: ALL; # multipart message @parts = (À̸ÞÀÏ :: mime-> create (attributes => {filename => "report.pdf", content_type => "application / pdf", encoding => "quod-printable", name => "2004-Financials.PDF",}, body => io ( "2004-Financials.PDF") -> ¸ðµÎ, À̸ÞÀÏ :: mime-> create (attributes => {content_type => "text / plain", óºÐ => "÷ºÎ ÆÄÀÏ", charset => "US-ASCII",}, body_str => "Hello There!",),); MY $ EMAIL = À̸ÞÀÏ :: MIME-> CREATE (header_str => , ÆÄÆ® => ,); # $ EMAIL-> PARTS_SET (),] # Ç¥ÁØ ¼öÁ¤ $ À̸ÞÀÏ -> header_str_set ( 'x-poweredby'=> 'rt v3.0'); $ Email-> header_str_set (=> rcpts ()); $ Email-> header_str_set (cc => aux_rcpts ()); $ Email-> header_str_set (bcc => sekrit_rcpts ()); # $ EMAIL-> ºÎÇ°ÀÇ °í±Þ $ _-> ENCODING_SET ( 'BASE64'); # Quick Multipart Creation My $ Quicky = Email :: MIME-> CREATE (header_str => , Q , Q ,); $ À̸ÞÀÏ Àμâ -> AS_String; Á¦Ç°ÀÇ È¨ÆäÀÌÁö


À̸ÞÀÏ :: MIME. °ü·Ã ¼ÒÇÁÆ®¿þ¾î