| www :: Bugzilla. www :: Mechize¸¦ ÅëÇØ Bugzilla ¹ö±×ÀÇ Á¦Ãâ / ¾÷µ¥ÀÌÆ® ó¸® |
Áö±Ý ´Ù¿î·Îµå |
www :: Bugzilla. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Brian Caswell
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~bmc/
www :: Bugzilla. ű×
www :: Bugzilla. ¼³¸í
www :: mechize¸¦ ÅëÇØ Bugzilla ¹ö±×ÀÇ Á¦Ãâ / ¾÷µ¥ÀÌÆ®¸¦ ó¸®ÇÕ´Ï´Ù. www :: Bugzilla´Â »õ·Î¿î Bugzilla ¹ö±×¸¦ °Ô½ÃÇÏ´Â API¿Í ±âÁ¸ Bugzilla ¹ö±×¸¦ ¾÷µ¥ÀÌÆ®ÇÏ´Â API¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. WWW :: Bugzilla »ç¿ë WWW :: Bugzilla; # »õ ¹ö±× ¸¸µé±â MY $ BZ = www :: Bugzilla-> New (server => www.mybugzilla.com ', email =>'buguser@bug.com ', password =>'myPassword '); # ÀϺΠÇʵ忡 Á¤º¸¸¦ ÀÔ·ÂÇÏ°í »õ ¹ö±× ÀúÀå # »ç¿ë °¡´ÉÇÑ ¹öÀü ¼±Åà ¸ñ·Ï ³» @versions = $ bz-> »ç¿ë °¡´É ( '¹öÀü'); # ¹öÀü $ BZ-> ¹öÀü ¼³Á¤ ($ ¹öÀü ); # »ç¿ë °¡´ÉÇÑ Á¦Ç° ¸ñ·Ï °¡Á® ¿À±â @products = $ bz-> »ç¿ë °¡´É ( 'Á¦Ç°'); # Á¦Ç° $ BZ-> Á¦Ç° ¼³Á¤ ($ PRODUCTS ); # »ç¿ë °¡´ÉÇÑ ±¸¼º ¿ä¼Ò ¸ñ·Ï °¡Á® ¿À±â @components = $ bz-> »ç¿ë °¡´É ( '±¸¼º ¿ä¼Ò'); # ±¸¼º ¿ä¼Ò $ BZ-> ±¸¼º ¿ä¼Ò ¼³Á¤ ($ ±¸¼º ¿ä¼Ò ); # Ç÷§Æû, OS, ¿ì¼± ¼øÀ§, ½É°¢µµ¿¡ ´ëÇØ ¼±ÅÃÀûÀ¸·Î µ¿ÀÏÇÏ°Ô ¼öÇàÇÕ´Ï´Ù. $ bz-> assigned_to ( 'joeschmoe@whatever.com'); $ BZ-> ¿ä¾à ($ some_text); $ bz-> ¼³¸í ($ some_more_text); # ¹ö±×¸¦ Á¦ÃâÇÏ°í, »õ ¹ö±× ¹øÈ£¸¦ ¹ÝȯÇÏ´Â $ bug_number = $ bz-> Ä¿¹Ô; # À§ÀÇ ¸ðµç °ÍÀÌ ÈξÀ ½±°Ô # ¹æ½ÄÀ¸·Î ¼öÇàµÇ¾úÀ» ¼öÀÖ¾ú½À´Ï´Ù. ¿ì¸®°¡ »ç¿ëÇÒ °ªÀ» ¾Ë°íÀÖ¾ú½À´Ï´Ù. My $ BZ = www :: Bugzilla-> New (server => www.mybugzilla.com ', email =>'buguser@bug.com ', password =>'mypassword '¹öÀü =>'¾ËÆÄ ', Product => 'MyProduct', Component => 'API', Assigned_to => 'joeschmoe@whatever.com', ¿ä¾à => $ some_text, ¼³¸í => $ some_text); ³» $ bug_number = $ bz-> Ä¿¹Ô; # ¾Æ·¡´Â ¹ö±×¸¦ ¾÷µ¥ÀÌÆ®ÇÏ´Â ¹æ¹ýÀÇ ¿¹ÀÔ´Ï´Ù. MY $ BZ = www :: Bugzilla-> New (server => www.mybugzilla.com ', email =>'buguser@bug.com ', password =>'myPassword 'bug_number => 46); # ¼±ÅÃÇÑ ±¸¼º ¿ä¼Ò ³» $ ±¸¼º ¿ä¼Ò = $ BZ-> ±¸¼º ¿ä¼Ò¸¦ Ç¥½ÃÇÕ´Ï´Ù. # ±¸¼º ¿ä¼Ò º¯°æ $ BZ-> ±¸¼º ¿ä¼Ò ( 'Å×½ºÆ® ½ÇÆÐ'); $ bz-> add_cc ( 'me@me.org'); $ bz-> add_attachment (filepath => '/home/me/file.txt', ¼³¸í => ''¼³¸í ÅؽºÆ® ', is_patch => 0, comment =>'comment text '); $ BZ-> ediable_comments (¿©±â¼´Â ÀÇ°ß "); # ¾Æ·¡ ¹ö±× »óŸ¦ º¯°æÇÏ´Â ¿¹Á¦ $ bz-> change_status ( "ÇÒ´ç"); $ bz-> change_status ( "°íÁ¤"); $ bz-> change_status ( "³ªÁß"); $ bz-> mark_as_duplicate ( "12"); $ bz-> Àç ÇÒ´ç ( "someone@else.com"); $ bz-> Ä¿¹Ô; ¿ä±¸ »çÇ× : ¡¤ Perl.
www :: Bugzilla. °ü·Ã ¼ÒÇÁÆ®¿þ¾î