net :: esmtp.

SMTP Ŭ¶óÀ̾ðÆ® ¶óÀ̺귯¸® (C libesmtp ¶óÀ̺귯¸® ¿ë ·¡ÆÛ)
Áö±Ý ´Ù¿î·Îµå

net :: esmtp. ¼øÀ§ ¹× ¿ä¾à

±¤°í

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

net :: esmtp. ű×


net :: esmtp. ¼³¸í

SMTP Ŭ¶óÀ̾ðÆ® ¶óÀ̺귯¸® (C LIBESMTP ¶óÀ̺귯¸® ¿ë ·¡ÆÛ) Net :: ESMTP´Â Postfix¿Í °°Àº ¹Ì¸® ±¸¼ºµÈ ¸ÞÀÏ Àü¼Û ¿¡ÀÌÀüÆ® (MTA)¸¦ »ç¿ëÇÏ¿© SMTP¸¦ »ç¿ëÇÏ¿© ÀüÀÚ ¸ÞÀÏÀ» °Ô½ÃÇÏ´Â ÀüÀÚ ¸ÞÀÏÀ» °ü¸®Çϵµ·Ï ¼³°èµÈ Perl ¸ðµâÀÔ´Ï´Ù. ÀÌ C ·¡ÆÛ´Â SASL, TLS, ÆÄÀÌÇÁ ¶óÀÎ, DNS, ´Ù¸¥ SMTP È®Àå (ETRN, DSN µî)À» ±â¹ÝÀ¸·Î ÇÑ Àå¾Ö Á¶Ä¡ ¸ÞÄ¿´ÏÁòÀ¸·Î LIBESMTPÀÇ °í±Þ ±â´É¿¡ ¾×¼¼½ºÇؾßÇÕ´Ï´Ù. ¸Þ½ÃÁö Çì´õ¸¦ Á¶ÀÛÇϸé MIMEÀ» Áö¿øÇÏÁö ¾Ê½À´Ï´Ù. MIME Áö¿øÀº ¿¹¸¦ µé¾î MIME :: Fast Perl Module (GMIME¶ó´Â C ¶óÀ̺귯¸®¸¦ ±â¹ÝÀ¸·Î ÇÔ) .WARNING :ÀÌ ÄÚµå´Â ¿©ÀüÈ÷ º£Å¸ ´Ü°è¿¡ ÀÖÀ¸¸ç ÀÎÅÍÆäÀ̽º ¸Þ¼Òµå°¡ º¯°æ µÉ ¼ö ÀÖ½À´Ï´Ù .SNOPSIS´Â NET :: ESMTP¸¦ »ç¿ëÇÕ´Ï´Ù. ³» $ session = new net :: esmtp :: session (); ³» $ message = $ ¼¼¼Ç -> add_message (); $ session-> set_server ( "localhost : 25"); # ¸ÞÀÏ ºÀÅõÀÇ ¿ª °æ·Î¸¦ ¼³Á¤ÇϽʽÿÀ. (undef´Â ±¦Âú½À´Ï´Ù) ³» $ from; $ message-> set_reverse_path ($ from); FH, "; $ str = ~ s / //G; $ str = ~ s / ...¿¡ / /G; ´Ý±â (FH) || "´Ý±â test.eml : $!"; # $ message-> set_message_str ($ str)¸¦ º¸³»·Á¸é # ¸Þ½ÃÁö ³»¿ëÀ» ¼³Á¤ÇϽʽÿÀ. ³» $ rcpt = 'test-nonexistent@nonexistent-example.com'; MY $ RECIPIENT = $ ¸Þ½ÃÁö -> add_recipient ($ RCPT); $ ¼ö½ÅÀÚ -> dsn_set_notify (notify_success | notify_failure); # # ¸Þ½ÃÁö # if (! $ ¼¼¼Ç -> start_session ()) {°æ°í "SMTP ¼­¹ö ¹®Á¦Á¡ :". smtp_strerror (smtp_errno ()); } else {My $ status = $ message-> message_transfer_status (); $ status -> { 'ÄÚµå'¸¦ ÀμâÇϽʽÿÀ. '' $ status -> { 'text'}; } ¿ä±¸ »çÇ× : ¡¤ Perl.


net :: esmtp. °ü·Ã ¼ÒÇÁÆ®¿þ¾î