ºÐ¼® :: FixedRecord.

°íÁ¤ Æø ·¹Äڵ带À§ÇÑ °´Ã¼ ÁöÇâ Æļ­
Áö±Ý ´Ù¿î·Îµå

ºÐ¼® :: FixedRecord. ¼øÀ§ ¹× ¿ä¾à

±¤°í

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

ºÐ¼® :: FixedRecord. ű×


ºÐ¼® :: FixedRecord. ¼³¸í

Parse :: FixedRecord´Â Æļ­¸¦ Á¤ÀÇÇÏ´Â °£´ÜÇÑ µµ¸ÞÀΠƯÁ¤ ¾ð¾î (DSL)°¡ÀÖ´Â MooseÀÇ Perl ÇÏÀ§ Ŭ·¡½ºÀÔ´Ï´Ù. STR¿¡¼­ °­¿äÇÏ´Â ÇÑ ¿øÇÏ´Â À¯ÇüÀÇ Á¦ÇÑ Á¶°ÇÀ» »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. µ¿ÀÏÇÑ Çü½ÄÀ¸·Î Çà °´Ã¼¸¦ Ãâ·ÂÇÏ·Á¸é ¿À¹ö·Îµå°¡ ÀÖ¾î¾ßÇÕ´Ï´Ù. PPARSE :: FixedRecord´Â Box¿¡¼­ ²¨³» Áö ±â°£°ú DateTime Á¦¾àÀ» Á¦°øÇÕ´Ï´Ù. ÀÌ¿Í °°Àº µ¥ÀÌÅÍ°¡ ÀÖ½À´Ï´Ù. 2009-12-08 | 01:05 Mary Blige | 2009-12-08 | 00 : 30 Æļ­ ¸¸µé±â : ÆÐÅ°Áö My :: Parser; ºÐ¼® :: FixedRecord; # ¾ö°ÝÇÏ°í °æ°í Ä÷³À» °¡Á®¿É´Ï´Ù. _ _name => width => 4, isa => 'str'; ±×¸² ''; column last_name => width => 6, isa => 'str'; ±×¸² | ' ¿­ ³¯Â¥ => width => 10, isa => 'date'; ±×¸² | ' ¿­ Áö¼Ó ½Ã°£ => width => 5, isa => 'duration'; 1; Äڵ忡¼­ : ³» :: Æļ­¸¦ »ç¿ëÇϽʽÿÀ. while (my $ line =) {eval {my $ object = my :: parser-> Parse ($ line); $ object-> first_name; $ $ °´Ã¼ -> duration-> in_units ( 'mins')> 60 ÀÎ °æ¿ì do_something (); }; } Á¦Ç°ÀÇ È¨ÆäÀÌÁö


ºÐ¼® :: FixedRecord. °ü·Ã ¼ÒÇÁÆ®¿þ¾î