Нужна помощь в записи файла CSV - PullRequest
1 голос
/ 11 января 2011

Я новичок в Perl. Мне нужна помощь, чтобы записать вывод в последний столбец файла CSV после некоторых операций в одной строке.Я использую модуль Text :: CSV_XS в Perl.Я знаю утверждение для записи в CSV-файл: print FH "sitepoint, 2, 7 \ n";Но как записать в определенный столбец, например, в 5-й столбец?

Ответы [ 2 ]

3 голосов
/ 11 января 2011

Из Text::CSV документов :

При записи файлов CSV с установленным always_quote пустое поле без кавычек является результатом неопределенного значения.

Таким образом, если вы сделаете что-то вроде:

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
0 голосов
/ 11 января 2011
print ",,,,5th column\n";

Это будет писать в 5-м столбце.Каждый , переходит к следующему столбцу.Также прочитайте это .

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...