| ±¸¼º :: ¸ðµ¨ :: objtrescanner. ½ºÄµ ±¸¼º Æ®¸® ¹× ÄÝ¹é ¼öÇà |
Áö±Ý ´Ù¿î·Îµå |
±¸¼º :: ¸ðµ¨ :: objtrescanner. ¼øÀ§ ¹× ¿ä¾à
- °Ô½ÃÀÚ À̸§:
- Dominique Dumont
±¸¼º :: ¸ðµ¨ :: objtrescanner. ű×
±¸¼º :: ¸ðµ¨ :: objtrescanner. ¼³¸í
Config Tree¸¦ ½ºÄµÇÏ°í ÄݹéÀ» ¼öÇàÇϽʽÿÀ config :: model :: objtrescanner´Â config Æ®¸®¸¦ °Ë»çÇÏ°í call-backs.synopsis¸¦ ¼öÇàÇÏ´Â perl ¸ðµâÀÔ´Ï´Ù. synopsis config :: model :: objtrescanner; # ±¸¼º Æ®¸® ¿ÀºêÁ§Æ® Á¤ÀÇ My $ root = ...; # Leaf Call refine real refly {my ($ scanner, $ data_ref, $ node, $ element_name, $ index, $ reaf_object) = @_; $$ data_ref. = "$ element_name =", $ ref_object-> °¡Á® ¿À±â; }; # °£´ÜÇÑ ½ºÄ³³Ê, (Ãʺ¸ÀÚ °æÇèÀ» °¡Áø ¸ðµç °ª Àμâ $ scan = config :: model :: objtresanner-> new (leaf_cb => disp_leaf, # mandatory ¸Å°³ º¯¼ö ¸¸); $ scan_node ³» $ result = ''; $ scan_node ($ °á°ú, $ ·çÆ®); #º¸´Ù º¹ÀâÇÑ ½ºÄ³³Ê¸¦ À§ÇØ $ scan = config :: model :: objtrescanner-> new (fallback => 'none', # ¸ðµç ÄݹéÀº Á¤ÀÇ µÈ ȯ°æ => 'master'Á¤ÀǵǾî¾ßÇÕ´Ï´Ù. # °í·Á ¸ðµç °ª # ³ëµå Äݹé node_content_cb => disp_obj_tb => disp_obj_elt_cb => disp_obj_cb => disp_hash, check_list_element_cb => disp_hash, hash_element_cb => disp_hash, node_element_cb => disp_hash, # ref_leaf, enum_value_cb => disp_leaf, integer_value_cb => disp_leaf number_value_cb => disp_leaf, boolean_value_cb => disp_leaf, string_value_cb => disp_leaf, rebalue_cb => disp_leaf, rebalue_cb => up_cb => sub {},); $ scan-> scan_node ( $ °á°ú, $ ·çÆ®); ¿ä±¸ »çÇ× : ¡¤ Perl.
±¸¼º :: ¸ðµ¨ :: objtrescanner. °ü·Ã ¼ÒÇÁÆ®¿þ¾î