需要一些帮助写入csv文件

时间:2011-01-10 22:29:42

标签: perl csv

我是perl的新手我需要一些帮助才能在单行上执行某些操作后将输出写入csv文件的最后一列。我在perl中使用Text :: CSV_XS模块。我知道写入csv文件的语句是print FH“sitepoint,2,7,n”;但是如何写入第5列这样的特定列?

2 个答案:

答案 0 :(得分:3)

来自Text::CSV docs

  

在编写设置为always_quote的CSV文件时,未加引号的空字段是未定义值的结果。

因此,如果您执行以下操作:

my @arr = ( undef, undef, undef, undef, "5th column" );
my $csv = Text::CSV->new ( { always_quote => 1 } );
open my $fh, '>', 'outfile.csv' or die $!;
$csv->print( $fh, \@arr );

...你应该得到一个

形式的输出文件
,,,,5th column

答案 1 :(得分:0)

print ",,,,5th column\n";

这将写入第5栏。每个,转移到下一列。另请阅读this