³ØŸÀÌ :: csv_file.

´Â ¹è¿­ÀÇ ¹è¿­¿¡ csv ÆÄÀÏÀ» ¹­½À´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

³ØŸÀÌ :: csv_file. ¼øÀ§ ¹× ¿ä¾à

±¤°í

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

³ØŸÀÌ :: csv_file. ű×


³ØŸÀÌ :: csv_file. ¼³¸í

¹è¿­ÀÇ ¹è¿­¿¡ csv ÆÄÀÏÀ» ¹­½À´Ï´Ù. TIE :: CSV_FILEÀº Á¤±Ô CSV ÆÄÀÏÀ» ¹è¿­ ¹è¿­·Î ³ªÅ¸³»´Â PERL ¸ðµâÀÔ´Ï´Ù. ù ¹ø° Ä¡¼ö´Â ¿ø·¡ ÆÄÀÏÀÇ LINE-NRÀ» ³ªÅ¸³»¸ç µÎ ¹ø° Â÷¿øÀº COL-NRÀ» ³ªÅ¸³À´Ï´Ù. µÎ À妽º°¡ ¸ðµÎ 0À¸·Î ½ÃÀÛÇÕ´Ï´Ù. ÀÏ¹Ý ¹è¿­ °ª, ¿¹¸¦ µé¾î ¾×¼¼½º ÇÒ ¼ö ÀÖ½À´Ï´Ù. $ data ¸¶Áö¸· ÁÙÀÇ ¸¶Áö¸· ÇʵåÀÇ ½ºÅÄµå ¶Ç´Â @ {$ data }Àº µÎ ¹ø° ÁÙÀÇ ¿­À» ³ªÅ¸³À´Ï´Ù. Synopsis Tie :: CSV_File; ³» @data, '³ØŸÀÌ :: csv_file', 'xyz.dat'À» ¹­¾î ¶ó. "3 ¹ø° ÁÙ¿¡"µ¥ÀÌÅ͸¦ ÀμâÇϽʽÿÀ : ", $ data ; @data; # ¶Ç´Â Å×À̺í Çü½Ä ¶Ç´Â °ø¹é ¶Ç´Â (¹Ý) ÄÝ·Ð ºÐ¸® ÆÄÀÏ ³ØŸÀÌ ³» @Data, 'tie :: csv_file', 'xyz.dat', tab_separated; # ¶Ç´Â ´ë½Å colon_separaved, semicolon_separated, pipe_separated, # ¶Ç´Â ½ÉÁö¾î whiteSpace_separated # ¶Ç´Â @Data, 'tie :: csv_file', 'xyz.dat', sep_char => ', sep_re => qr / \ s * \ | \ s * /, quote_char => undef, eol => undef, # default compine_char => undef, always_quote => 0; # ±âº» $ µ¥ÀÌÅÍ = 4; $ data = "¸¶Áö¸· ÁÙÀÇ ¸¶Áö¸· ¿­"; $ µ¥ÀÌÅÍ = ; Ǫ½Ã @Data, ; Ǫ½Ã @Data, ; my @headings = @ {shift @data}; # ù ¹ø° ÁÙÀÌ @last_row = @ @last_row = @ @data} Á¦°ÅµË´Ï´Ù. # ¸¶Áö¸· ÁÙ @Data = , , ]À» Á¦°ÅÇÕ´Ï´Ù. # ±âº» ¸Å°³ º¯¼ö°¡ÀÖ´Â # ´ÙÀ½ CSV ÆÄÀÏÀÌ »ý¼ºµË´Ï´Ù. # 1,2,3 # 4,5,6 # 7,8,9 ¿ä±¸ »çÇ× : ¡¤ Perl.


³ØŸÀÌ :: csv_file. °ü·Ã ¼ÒÇÁÆ®¿þ¾î