摘要: #!/usr/bin/perl -wuse strict;use warnings;use Tie::File;open(IN_FILE,"E:/Hzj_works/test2.csv"); while(my $line = ){ my @fields = split "," , $line; ... 阅读全文
posted @ 2014-12-24 11:04 提佰萬 阅读(188) 评论(0) 推荐(0)
摘要: #!/usr/bin/perl#use strict;open(FILE1,"C:/Perl/BX/BX-Users.csv");open(FILE2,"C:/Perl/BX/BX-Books.csv");open(FILE3,"C:/Perl/BX/BX-Book-Ratings.csv");op... 阅读全文
posted @ 2014-12-24 11:03 提佰萬 阅读(955) 评论(0) 推荐(0)
摘要: http://cn.perlmaven.com/how-to-read-a-csv-file-using-perlhttp://search.cpan.org/~hmbrand/Text-CSV_XS-1.09/CSV_XS.pm读取并处理文本是 Perl 的强项。有时候你有一个CSV(Comma-... 阅读全文
posted @ 2014-12-24 11:00 提佰萬 阅读(1089) 评论(0) 推荐(0)