PoE :: Component :: Oscar

POE :: Component :: Oscar´Â Net :: OSCAR ¸ðµâÀÇ POE ±¸¼º ¿ä¼ÒÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

PoE :: Component :: Oscar ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Dan McCormick
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~dmcc/POE-Component-OSCAR-0.05/lib/POE/Component/OSCAR.pm

PoE :: Component :: Oscar ű×


PoE :: Component :: Oscar ¼³¸í

PoE :: Component :: Oscar´Â Net :: OSCAR ¸ðµâÀÇ POE ±¸¼º ¿ä¼ÒÀÔ´Ï´Ù. PoE :: Component :: Oscar´Â Net :: Oscar ModuleÀÇ PoE ±¸¼º ¿ä¼ÒÀÔ´Ï´Ù. SynopsisUse PoE QW (Component :: Oscar); Sub _Start {# ½ÃÀÛ ¿À½ºÄ« ¼¼¼Ç $ Oscar ½ÃÀÛ = POE :: ±¸¼º ¿ä¼Ò :: ¿À½ºÄ« -> new (); # »õ ¿¬°áÀÇ ÀÚµ¿ ½º·ÎƲ·Î ¿À½ºÄ« ¼¼¼Ç ½ÃÀÛ # ¼­¹ö°¡ ±ÝÁöµÇÁö ¾Êµµ·Ï $ OSCAR = POE :: Component :: Oscar-> New (Throttle => 4); # "im_in"ÄݹéÀ» ¼³Á¤ÇÏ¿© "im_in_state"$ oscar-> set_callback (im_in => 'im_in_state')¸¦ È£ÃâÇÕ´Ï´Ù. # ±ÝÁö µÈ $ oscar-> set_callback (error => error_state ')¸¦ ¾ò°í ½ÍÁö ¾ÊÀº °æ¿ì ¿À·ù¸¦ °¨ÁöÇÏ´Â °ÍÀÌ ÁÁ½À´Ï´Ù. $ oscar-> set_callback (admin_error => 'admin_erro_stater'); $ oscar-> set_callback (rate_alert => rate_alert_state '); # ·Î±×¿Â $ oscar-> signon (screenname => $ my_screenname, password => $ my_password);} sub im_in_state {my ($ nothing, $ args) = @_ ; My ($ °´Ã¼, $ ´©°¡, $ what, $ ¿þÀ̺ê) = @ $ args; "$ won '¿¡¼­'°¡Á® °¡±â '¸¦ ÀμâÇϽʽÿÀ.} ¿ä±¸ »çÇ× : ¡¤ Perl.


PoE :: Component :: Oscar °ü·Ã ¼ÒÇÁÆ®¿þ¾î

¼ö¸®

SURUI ÇÁ·ÎÁ§Æ®´Â ¸ðµâ ½Ä À̺¥Æ® Á᫐ ÇÁ·Î±×·¡¹Ö ÇÁ·¹ÀÓ ¿öÅ©ÀÔ´Ï´Ù. ...

171

´Ù¿î·Îµå