| WebService :: Timelog. WebService :: Timelog´Â Timelog API¿¡ ´ëÇÑ Perl ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
WebService :: Timelog. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Kentaro Kuribayashi
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~kentaro/WebService-Timelog-0.05/lib/WebService/Timelog.pm
WebService :: Timelog. ű×
WebService :: Timelog. ¼³¸í
WebService :: Timelog´Â Timelog API¿¡ ´ëÇÑ Perl ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù. WebService :: Timelog´Â timelog api.synopsis¿¡ ´ëÇÑ perl ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù webservice :: timelog; ³» $ timelog = webservice :: timelog-> new (username => $ username, password => $ password); # ¾÷µ¥ÀÌÆ® »óÅ $ timelog-> new_msg (text => $ text); # ¶Ç´ÂÀÌ $ TIMOLOG-> ¾÷µ¥ÀÌÆ® ($ text)¿Í °°ÀÌ ÇÒ ¼ö ÀÖ½À´Ï´Ù. # °ø°³ ¸Þ½ÃÁö °Ë»ö My $ public_messages = $ TIMOLOG-> PUBLIC_MSG (CNT => $ count, ÀÌÈÄ => $ count,); # Ä£±¸ ¸Þ½ÃÁö °Ë»ö ³» $ friends_messages = $ timelog-> friends_msg (cnt => $ count, ÀÌÈÄ => $); # Á÷Á¢ ¸Þ½ÃÁö °Ë»ö My $ direct_messages = $ timelog-> direct_msg (cnt => $ count); # MY $ MY_MESSAGES = $ TIMELOG-> MY_MSG (CNT => $ COUNT, STAT => $ STAT, ÀÌÈÄ·Î $ STAT, $ STAT, STAT => $ STAT) ¸¸ °Ë»öÇϽʽÿÀ. # ¸Þ½ÃÁö °Ë»ö ¸Þ½ÃÁö°¡ ³» $ response_messages = $ timelog-> res_msg (cnt => $ count); # °ø°³ ÅÂ±× °Ë»ö My $ Tags = $ timelog-> ÅÂ±× (); # ³» $ me = $ timelog-> show ()¿¡ ´ëÇÑ Á¤º¸¸¦ °Ë»öÇϽʽÿÀ. # Ä£±¸µé¿¡°Ô ¾à°£ÀÇ Á¤º¸¸¦ °Ë»öÇϽʽÿÀ. My $ Friends = $ timelog-> Ä£±¸ (cnt => $ count); ¿ä±¸ »çÇ× : ¡¤ Perl.
WebService :: Timelog. °ü·Ã ¼ÒÇÁÆ®¿þ¾î