Volity :: Jabber.

Volity :: Jabber´Â Jabber-Speaking Volity °´Ã¼ÀÇ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Volity :: Jabber. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Jason McIntosh
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://volity.org/projects/gamut/

Volity :: Jabber. ű×


Volity :: Jabber. ¼³¸í

Volity :: Jabber´Â Jabber-Speaking Volity °´Ã¼ÀÇ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. Volity :: Jabber´Â Jabber-Speaking Volity objects.Synopsis ÆÐÅ°ÁöÀÇ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. My :: Volity :: Object; ±âº» QW (Volity :: Jabber)¸¦ »ç¿ëÇϽʽÿÀ. Çʵå QW (wubba_wubba); # ºÎ¸ðÀÇ ÃʱâÈ­ ¸Þ¼Òµå¸¦ ÀçÁ¤ÀÇÇÏ¿© ±¸¼º½Ã °ªÀ» ¼³Á¤ÇÕ´Ï´Ù. ÇÏÀ§ ÃʱâÈ­ {My $ self = shift; $ self-> super :: ÃʱâÈ­ (@_); # ºÎ¸ð´ÔÀÇ initÀ̶ó°í ºÎ¸£´Â °ÍÀ» ÀØÁö ¸¶½Ê½Ã¿À! # ÃʱâÈ­´Â ¿©±â $ self-> wubba_wubba ( 'gronk gronk'); } # ±âº» Ŭ·¡½º ÇÏÀ§ handle_groupchat_message {My $ self = shift; MY ($ ¸Þ½ÃÁö) = @_; # µé¾î¿À´Â ¸Þ½ÃÁö¿¡ ´ëÇÑ Á¤º¸°¡ÀÖ´Â Çؽà ref. # µð¹ö±× ¸Þ½ÃÁö¸¦ º¸³À´Ï´Ù. $ self-> logger-> debug (sprintf ( "% s, '% s'n", $$ ¸Þ½ÃÁö {}, $$ ¸Þ½ÃÁö {Body})))); # ´õ ¸¹Àº ¸Þ½ÃÁö ó¸® ÄÚµå »ç¿ëÀÌ ¿©±â¿¡ ÀÖ½À´Ï´Ù. }ÀÌ ÆÐÅ°Áö´Â jabber¸¦ ¸»ÇÏ´Â Volity °´Ã¼ÀÇ ±âº» Ŭ·¡½º¸¦ Á¦°øÇÕ´Ï´Ù. ÀÌ·¯ÇÑ °´Ã¼´Â ±¸Ãà½Ã Jabber ¼­¹ö¿¡ ÀÚµ¿À¸·Î ¿¬°á (¹× ÀÎÁõ) ÇÑ ´ÙÀ½ ÀϺΠÀϹÝÀûÀÎ jabbery »ç¹°À» ¼öÇàÇÏ´Â ¹æ¹ýÀ» Á¦°øÇÏ°í PoE Ä¿³Î¿¡ ¾×¼¼½º ÇÒ ¼ö ÀÖ½À´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.


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