| ¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦ String :: Tokenizer´Â °£´ÜÇÑ ¹®ÀÚ¿ ÅäÅ« ÈÁ¦ÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Stevan Little
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~stevan/
¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦ ű×
¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦ ¼³¸í
String :: Tokenizer´Â °£´ÜÇÑ ¹®ÀÚ¿ ÅäÅ« ÈÁ¦ÀÔ´Ï´Ù. String :: Tokenizer´Â °£´ÜÇÑ ¹®ÀÚ¿ TokenizerÀÔ´Ï´Ù. Synopsis ¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦¸¦ »ç¿ëÇÕ´Ï´Ù. # ÅäÅ« ³ªÀÌÀú ¸¸µé±â ¹× ÅäÅ« È ³» $ Tokenizer = ¹®ÀÚ¿ :: ÅäÅ« ÈÀÌÀÚ -> »õ ( "(("(( "((((("(( "(((("(((( "((((("(((( "(((("((((( "() '+ * ()'); # tokenizer ¸¸µé±â My $ Tokenizer = ¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦ -> new (); # ... ´ÙÀ½ $ Tokenizer-> ÅäÅ« È ( "(("(( "(("(( "(("(( "(("( "());)¸¦ ÅäÅ« ÈÇÕ´Ï´Ù. # '(, (, 5, +, 5,), -, 10,)'Àμ⠰¡ÀÔ ","=> $ tokenizer-> getToKens ()¸¦ ÀμâÇÕ´Ï´Ù. # °ø¹éÀ» º¸À¯ÇÏ´Â ÅäÅ« ³ªÀÌÀú ¸¸µé±â My $ st = ¹®ÀÚ¿ :: ÅäÅ« ÈÀÌÀú -> »õ ( 'ÀÌ°ÍÀº Å×½ºÆ®, (Signifigant) °ø¹é', ',' ', string :: tokenizer-> retain_whiteSpace); # ÀÌ°ÍÀº Àμâ ÇÒ °ÍÀÔ´Ï´Ù : # '' '', '´Â', '', 'a' ','test ',' ',' ',' ','( ',', '', '', ' ) ',' '' ','°ø¹é 'Àμâ' ''. (°¡ÀÔ ", '"=> $ Tokenizer-> getToKens ()). "" "; # ÅäÅ« ¹Ýº¹ÀÚ °¡Á® ¿À±â My $ i = $ Tokenizer-> iterator (); while ($ i-> hasnexttoken ()) {My $ next = $ i-> nextToken (); # ³» ´ÙÀ½ ÅäÅ«¿¡¼ ¾ÕÀ¸·Î ¾Õ¼ ³ªÀÇ $ look_ahead = $ i-> lookAheadToken (); # ... # ´ÙÀ½ 2 ÅäÅ« $ i-> ½ºÅµ Æ潺 (2); # ... ´ÙÀ½ Backtrack 1 ÅäÅ« My $ privity = $ i-> prevtoken (); # ... # ÇöÀç ÅäÅ« °¡Á® ¿À±â MY $ ÇöÀç = $ i-> currentToken (); # ...} ¹®ÀÚ¿À» °¡Á® ¿Í¼ °ø¹é¿¡ ÂÉ°³´Â °£´ÜÇÑ ¹®ÀÚ¿ ÅäÅ« ³ªÀÌÀúÀÔ´Ï´Ù. ¶ÇÇÑ ¼±ÅÃÀûÀ¸·Î ±¸ºÐ ±âÈ£·Î »ç¿ëÇÒ ¹®ÀÚ¿ ¹®ÀÚ¿À» »ç¿ëÇÏ°í ÅäÅ« ¼¼Æ®·ÎÀ̸¦ ¹ÝȯÇÕ´Ï´Ù. À̸¦ ÅëÇØ ¿©·¯ °¡Áö ¹æ¹ýÀ¸·Î ¹®ÀÚ¿À» ºÐÇÒ ÇÒ ¼ö ÀÖ½À´Ï´Ù. ÀÌ´Â ¸Å¿ì ±âº»ÀûÀÎ ÅäÅ« ³ªÀÌÀú À̹ǷÎÀÌ ¸ðµâ¿¡¼ »ý¼º µÈ Ãâ·ÂÀÇ »ç¿ëÀÚ Á¤ÀÇ ÀÛ¼º ÅäÅ« ³ªÀÌÀú ¶Ç´Â »çÈÄ Ã³¸®·Î ´õ º¹ÀâÇÑ ¿ä±¸ »çÇ×À» ´õ º¹ÀâÇÏ°ÔÇؾßÇÕ´Ï´Ù. ±âº»ÀûÀ¸·Î ÀÌ°ÍÀº ¸ðµç ¸ÖƼ Çʼö¸¦ ä¿ìÁö ¾ÊÁö¸¸ ÈξÀ ´õ Å©°í º¹ÀâÇÑ ¸ðµâ°ú °ü·ÃµÈ °£´ÜÇÑ ºÐÇÒ / /, $ string°ú ´Ù¸¥ ¿É¼Ç »çÀÌÀÇ °ÝÂ÷°¡ ¹ß»ýÇÕ´Ï´Ù. ¶ÇÇÑ ÀÌ°ÍÀº ¾îÈÖ ºÐ¼®±â°¡ ¾Æ´Ï¶ó´Â °ÍÀÔ´Ï´Ù. ¸¹Àº »ç¶÷µéÀÌ ÅäÅ« ȸ¦ ¾îÈÖ ºÐ¼®À¸·Î È¥µ¿ÇÕ´Ï´Ù. ÅäÅ« ³ªÀÌÀú´Â ±× ÀÔ·ÂÀ» ƯÁ¤ µ¢¾î¸®·Î ¼¯¾î¼ ¾îÈÖ ºÐ¼®±â°¡ ÇØ´ç ûũ¸¦ ºÐ·ùÇÕ´Ï´Ù. ¶§·Î´ÂÀÌ µÎ ´Ü°è°¡ °áÇÕµÇÁö¸¸ ¿©±â¿¡´Â ¾Æ´Õ´Ï´Ù. ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.
¹®ÀÚ¿ :: ÅäÅ« ÈÁ¦ °ü·Ã ¼ÒÇÁÆ®¿þ¾î