¹è¿­ :: Linereader.

¹è¿­À» ÅëÇØ ÆÄÀÏÀÇ ¾×¼¼½º
Áö±Ý ´Ù¿î·Îµå

¹è¿­ :: Linereader. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Bjoern Holsten
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~bholsten/

¹è¿­ :: Linereader. ű×


¹è¿­ :: Linereader. ¼³¸í

¹è¿­À» ÅëÇØ ÆÄÀÏÀÇ ¾×¼¼½º Çà Array :: LineReader´Â ¹è¿­ÀÇ ¿ä¼Ò¿¡ ÀÇÇØ ÀϺΠÆÄÀÏÀÇ ÁÙ¿¡ ¾×¼¼½º ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. ÀÌ ModulÀº Tie :: Array (Tie :: Array ÂüÁ¶)¿¡¼­ ¸Þ¼­µå¸¦ À¯ÀÔÇÕ´Ï´Ù. ÆÄÀÏÀÇ ÄÜÅÙÃ÷°¡ ÇÊ¿äÇÒ ¶§¸¸ Àбâ Àü¾ß, Áï ¹è¿­ÀÇ ¿ä¼Ò¿¡ ¾×¼¼½ºÇÏ´Â °æ¿ì¿¡ ¸¹Àº ¸Þ¸ð¸®¸¦ ÀúÀåÇÕ´Ï´Ù. ¸ðµç ¼±ÀÇ ¿ÀÇÁ¼Â°ú ±æÀÌ´Â ¹è¿­À» ¹­´Â ÇÑ ¸Þ¸ð¸®¿¡ ÀúÀåµË´Ï´Ù. ±âº» ÆÄÀÏÀÌ ¹ÙÀ̳ʸ® ¸ðµå¿¡¼­ Àбâ À§ÇØ ¿­·Á ÀÖ½À´Ï´Ù. (¿¹, eOL ½ÃÄö½º, Áï end-of-line ¹× eof-characher, Áï ÆÄÀÏ ³¡ "x1a"¶õ ¹«¾ùÀΰ¡? ÀÐÀº ¹ÙÀÌÆ®´Â Neigther ¹ø¿ªµÇ°Å³ª ¾ï¾ÐµÇÁö ¾ÊÀ½ÀÌ ¾ïÁ¦µË´Ï´Ù. ¶óÀÎÀº EOL ½ÃÄö½º¸¦ Æ÷ÇÔÇÏ°í Æ÷ÇÔÇÕ´Ï´Ù. EOL ½ÃÄö½º´Â "x0dx0a"¶Ç´Â "x0ax0d"¶Ç´Â "x0d"¶Ç´Â "x0a"¶ó°í °¡Á¤ÇÕ´Ï´Ù. Array.Snopsis »ç¿ë ¹è¿­ :: Linereader; ³» @lines; # @linesÀÇ ¿ä¼Ò·Î ¸ðµç ÇàÀÇ ³»¿ëÀ» °¡Á®¿É´Ï´Ù. TIE @ Lines, '¹è¿­ :: linereader', 'filename'; ½ºÄ®¶ó Àμâ (@ Lines); # ÆÄÀÏÀÇ ÁÙ ¼ö Àμâ $ lines ; ù ¹ø° ÁÙ Àμâ $ LINE ÀÇ ³»¿ë; # ¸¶Áö¸· ÁÙÀÇ ³»¿ë ... # @linesÀÇ ¿ä¼Ò¸¦ ÅëÇØ ¹è¿­ ÂüÁ¶·Î ¸ðµç ÁÙÀÇ ¿ÀÇÁ¼Â°ú ÄÜÅÙÃ÷¸¦ °¡Á®¿É´Ï´Ù. Tie @ Lines, 'Array :: Linereader', 'filename', °á°ú => []; ½ºÄ®¶ó Àμâ (@ Lines); # ÆÄÀÏ Àμâ $ LINE -> , ":", $ LINE -> ; # ¿ÀÇÁ¼Â ¹× 5 ȸ¼± Àμâ $ LINES -> , ":", $ LINE -> ; # ¸¶Áö¸· ÁÙÀÇ ¿ÀÇÁ¼Â ¹× ³»¿ë ... # @linesÀÇ ¿ä¼Ò¸¦ ÅëÇØ Çؽà ÂüÁ¶ÀÇ ¿ÀÇÁ¼Â°ú ³»¿ëÀ» °¡Á®¿É´Ï´Ù. ³ØŸÀÌ @lines, 'array :: linereader', 'filename', result => {} ...¿¡ ½ºÄ®¶ó Àμâ (@ Lines); # ÆÄÀÏ Àμâ $ LINE -> {OFFSET}, ":", $ LINE -> {CONTONT}; # ¿ÀÇÁ¼Â ¹× 4 ȸ¼± Àμâ $ LINES -> {OFFSET}, ":", $ LINE -> {CONTONT}; # ¸¶Áö¸· ÁÙÀÇ ¿ÀÇÁ¼Â ¹× ³»¿ë ... ¿ä±¸ »çÇ× : ¡¤ Perl.


¹è¿­ :: Linereader. °ü·Ã ¼ÒÇÁÆ®¿þ¾î