ÆÄÀÏ :: ANVL.À̸§ °ª ¾ð¾î ·çƾ | |
Áö±Ý ´Ù¿î·Îµå |
ÆÄÀÏ :: ANVL. ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- John A. Kunze
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~jak/
ÆÄÀÏ :: ANVL. ű×
ÆÄÀÏ :: ANVL. ¼³¸í
FILE :: ANVLÀº ANVL Çü½ÄÀ¸·Î Ç¥½ÃµÇ´Â µ¥ÀÌÅÍ¿¡ ´ëÇÑ ÀϹÝÀûÀÎ ÇÁ·¹ÀÓ ¿öÅ©¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. ANVL (À̸§ °ª ¾ð¾î)Àº ÀüÀÚ ¸ÞÀÏ Çì´õ¿Í À¯»çÇÑ Label-ÄÝ·Ð °ª Çü½ÄÀÇ ¿ä¼Ò¸¦ ³ªÅ¸³À´Ï´Ù. "Ãâ·Â ¸ÖƼÇ÷º¼"ÆÄÀÏ :: OMÀÌ XML, °ÅºÏÀÌ, JSON, CSV ¹× PSV (ÆÄÀÌÇÁ ºÐ¸® °ª) ¹× ÀÏ¹Ý ·¹À̺íÀ̾ø´Â ÅؽºÆ®¸¦ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ÆÄÀÏ :: ANVLÀ» »ç¿ëÇÕ´Ï´Ù. # ·çƾÀ» Perl Script XgetLines·Î °¡Á® ¿À·Á¸é $ FileHandle # ºó ÁÙ·Î $ FileHandle (±âº»°ªÀ¸·Î * argv·Î ÀÐÀ¸½Ê½Ã¿À). EOF¿¡¼ ·¹ÄÚµå Àб⠶Ǵ ÇØÁ¦¸¦ ¹ÝȯÇÕ´Ï´Ù.);); # ·¹ÄÚµå´Â ¸ðµç °ø¹é (°ÅÀÇ EOF) Æ®¸®°Å (±â·Ï¿¡¼ Ãʱ⠰ø¹é ½ºÆ®¸³, Á¾Á¾ $ ·¹ÄÚµå, # GetLines ()¿¡ ÀÇÇØ ¹Ýȯ µÈ °Í, $ R_WSLINE, # ¼±ÅÃÀû REF TRIMMED WHITESPACE $ R_RRLINESÀÇ ¶óÀÎ ¼ö¸¦ ¼±ÅÃÇϽʽÿÀ) ...¿¡ # ¼±ÅÃÀû Ref ½ÇÁ¦ ·¹ÄÚµå ¶óÀÎÀÇ ¶óÀÎ ¼ö anvl_recarray (Lineno-name-value $ ·¹ÄÚµåÀÇ ¹è¿, # Æ®¸®ÇÃ, ù ¹ø° Æ®¸®Çà $ R_ELEMS´Â $ R_ELEMÀÇ ¹è¿·Î ºÐÇҵ˴ϴÙ. ¸®ÅÏ µÈ ¹è¿ $ lineno, # ½ÃÀÛ Çà ¹øÈ£ ½ÃÀÛ (±âº»°ª 1) $ opts); # ¿É¼Ç / ±âº»°ª, comments / 0, autoIndent / 1 ERC_ANVL_EXPAND_ARRAY (# ªÀº ERC ANVL ¾î·¹À̸¦ ±ä ¾ç½Ä ERC $ R_ELEMS·Î º¯°æ); # ANVL_ARAYHASH (Requarray ¶Ç´Â Expand_Array $ R_ARLEMSÀÇ # Çؽà À妽º¿¡¼ # Çؽà À妽º, ¿À¸®Áö³Î ¹è¿ (¼öÁ¤µÇÁö ¾ÊÀ½) $ R_HASH (r_hash)ÀÇ Àå¼Ò¿¡¼ ¼öÁ¤ÇÒ ¹è¿À» ÂüÁ¶ÇϽʽÿÀ. # Çؽà (»ç¿ëÇÏÁö ¾ÊÀ½) anvl_valsplit (Anvalues $ value, # ÀÔ·Â °ªÀÇ ¹è¿·Î ANVL °ª ºÐÇÒ)À» ÂüÁ¶ÇϽʽÿÀ. ¹Ýȯ µÈ °ªÀÇ ¹è¿ÀÇ ¹è¿ ANVL_DECODE ($ str); # String anvl_name_naturalize¿¡¼ AnVL ½ºÅ¸ÀÏ % xy ¹®ÀÚ µðÄÚµù (# À̸§À» Á¤·Ä Ä£ÈÀû ÀÎ ÀÚ¿¬½º·¯¿î $ À̸§À¸·Î º¯È¯); ANVL ¹ÝÀü ÁöÁ¡ ANVL_OMÀ» »ç¿ëÇÏ¿© # ¿öµå ÁÖ¹® (# argv $ om, # ÆÄÀÏ :: OM Æ÷¸Ë ¿ÀºêÁ§Æ® {#Àº ´Ù¾çÇÑ ¿É¼Ç¿¡ ´ëÇÑ Çؽà ÂüÁ¶ autoIndent => 0, # (±âº»°ª) Á¤È®ÇÏÁö ¾Ê½À´Ï´Ù. Sloppy Ground elem_order => 0, # ¸í·É µÈ ¿ä¼Ò À̸§ ¸ñ·Ï (±âº»°ª ¸ðµÎ) comments => 1, # do (±âº»°ª) ÀÔ·Â ¼³¸í verbose => 1, # Ãâ·Â ·¹ÄÚµå ¹× ÁÙ ¹øÈ£ (±âº»°ªÀº ) ...}); ³ªÁß¿¡ ³ª¿µÈ ±âŸ ¿É¼Ç anvl_opt_defaults (); # °øÀå ±âº»°ªÀ¸·Î Çؽà ÂüÁ¶ * »ç¿ëµÇÁö ¾Ê´Â * ANVL_RECHASH (¿ä¼ÒÀÇ Çؽ÷ΠºÐÇÒ µÈ ANVL ·¹ÄÚµå, # ÀÔ·Â ·¹ÄÚµå, ARG 2´Â $ R_HASH¸¦ ¹ÝȯÇÏ´Â ÂüÁ¶)ÀÔ´Ï´Ù. °ªÀº ½ºÄ®¶ó ¶Ç´Â ½ºÄ®¶ó $ strictÀÇ ¹è¿ ); # µÎ °³ ÀÌ»óÀÇ ¿ä¼Ò°¡ ANVL_RECSPLIT (# °ª ½ÖÀÇ ¹è¿·Î ºÐÇÒ ·¹ÄÚµå, $ ·¹ÄÚµå, # ÀÔ·Â ·¹ÄÚµå·Î ºÐÇÒ ·¹ÄÚµå, # arg 2´Â $ R_ELEMS, # ¹è¿, ¼±ÅÃÀû arg 3 (±âº»°ª 0) ÇÊ¿äÇÕ´Ï´Ù. ¾ö°ÝÇÑ ); # ÀûÀýÇÏ°Ô µé¿© ¾²±â µÈ ¿¬¼Ó ¼± Anvl_encode ($ str); # anvl-encode string * anvl_fmt ´ë½Å ÆÄÀÏ :: OM :: anvl °´Ã¼ÀÇ 'elems'¸Þ¼Òµå ´ë½Å $ elem = anvl_fmt (# Çü½Ä ANVL ¿ä¼Ò, 72 Ä÷³¿¡ ·¡ÇÎ, # $ name, # $ name, # $ name, left ÄÝ·Ð (:) $ °¡Ä¡, # $ value´Â ÄÝ·ÐÀÇ ¿À¸¥ÂÊÀ¸·Î°¡´Â °ÍÀÔ´Ï´Ù ...); # ´õ ¸¹Àº À̸§ / °ª ½ÖÀÌ FollowCoductÀÇ È¨ÆäÀÌÁö·Î
ÆÄÀÏ :: ANVL. °ü·Ã ¼ÒÇÁÆ®¿þ¾î