Would you mind being more specific? Can you tell us which module you are using and show a few lines of the code where you use it?

#!/usr/bin/env perl


use Text::CSV;
my $csv = Text::CSV->new();          

  open(my $in_fh, "<", "temporary.tl") 
    or die "please create your temporary file: $!";

my @rows = ();                                                        
+     # keeps the count of rows in txt input file
while( my $line = <$in_fh> ){                                         
+     #  copies the line from our input 
  chomp $line;
  
  push @rows, [ split m{ , }msx, $line ];                             
+     
}
close $in_fh or die "could not close $in_file: $!\n";

$csv->eol( "\n" );                                                    
+     # after each line it gives a new line command

print " Please enter the name of your csv file in which you will make 
+modifications  ";
print "\n";
my $out_file = <>;
    chomp $out_file;
   

open my $out_fh, '>', $out_file or die "could not open $out_file: $!\n
+";

for my $row ( @rows ){
  $csv->print( $out_fh, $row ) or die "could not print to $out_file: $
+!\n";         
}
close $out_fh or die "could not close $out_file: $!\n";
[download]

This is what I am doing