www :: Gmail.

www :: GmailÀº Google Mail (Gmail)¿¡ ¾×¼¼½ºÇϱâÀ§ÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

www :: Gmail. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • David Davis
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~xantus/POE-Component-Proxy-MSN-0.02/lib/POE/Component/Proxy/MSN.pm

www :: Gmail. ű×


www :: Gmail. ¼³¸í

www :: GmailÀº Google Mail (Gmail)¿¡ ¾×¼¼½ºÇϱâÀ§ÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù. www :: GmailÀº Google Mail (Gmail)¿¡ ¾×¼¼½ºÇϱâÀ§ÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù (Gmail) .Synopsis www :: Gmail; $ obj = www :: gmail-> new (username => "username =>"username ", password =>"password ", cookies => {autosave => 1, file =>"./gmail.cookie ",},); ³» $ ret = $ obj-> login (); if ($ ret == -1) {print "password password enchorectn"; } ELSIF ($ ret == 0) {print "·Î±×ÀÎ ÇÒ ¼ö ¾ø½À´Ï´Ù $ obj -> {error} n"; Ãⱸ; } my @list = $ obj-> get_message_list ( '¹ÞÀº ÆíÁöÇÔ'); #¹ÞÀº ÆíÁöÇÔ¿¡¼­ »õ ¸Þ½ÃÁö¸¦ °è»êÇϽʽÿÀ. $ new_msgs = 0; ³» $ i (0 .. $ # list) {$ new_msgs + = $ list -> ; # count ÀÐÁö ¾ÊÀº Ç÷¡±×} "±ÍÇÏ´Â $ New_msgs ±ÍÇÏÀǹÞÀº ÆíÁöÇÔ¿¡ »õ·Î¿î ¸Þ½ÃÁö°¡ ÀÖ½À´Ï´Ù"; my @contacts = $ obj-> get_contact_list (); "´ç½ÅÀÌ °¡Áö°íÀÖ´Â"ÀμâÇϽʽÿÀ. (@ ¿¬¶ôó). "¿¬¶ôó"; My $ Gmail = 0; ³» $ i (0 .. $ # ¿¬¶ôó) {$ Gmail + = ($ ¿¬¶ôó -> = ~ m / gmail.com $ / i); } "$ GmailÀÌ Gmail Addressn"À» ÀμâÇÕ´Ï´Ù. $ obj-> ·Î±× ¾Æ¿ô (); ¿ä±¸ »çÇ× : ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.


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

pyqstat.

PYQSTAT ÇÁ·ÎÁ§Æ®´Â ½Ç½Ã°£ °ÔÀÓ ¼­¹ö »óÅ µµ±¸ ÀÎ QSTAT ÁÖÀ§ÀÇ ÆÄÀ̽㠷¡ÆÛÀÔ´Ï´Ù. ...

135

´Ù¿î·Îµå

gsquery.

GSQuery Project´Â ´Ù¾çÇÑ °ÔÀÓ ¼­¹ö¸¦ Äõ¸® ÇÒ ¼öÀÖ´Â PHP ¶óÀ̺귯¸®ÀÔ´Ï´Ù. ...

137

´Ù¿î·Îµå