如何将字符附加到文件中的一行?

Mat*_*ttS 1 perl

我有一个从票务系统中提取的CSV文件(我没有直接的数据库访问权限),需要在另一个数据库中添加几个列,然后在Excel中创建报表.

我正在使用Perl从其他数据库中提取数据,并希望在处理文件时将附加列附加到每行的末尾.

有没有办法在不必基本上创建新文件的情况下执行此操作?基本结构是:

foreach $line (@lines) {
    my ($vars here....) = split (',',$line);
    ## get additional fields
    ## append new column data to line
}
Run Code Online (Sandbox Code Playgroud)

Que*_*tin 7

您可以查看DBD :: CSV来将文件视为数据库(它也可以为您处理转义的特殊字符).