debug with csv lines

This commit is contained in:
Jean-Marie Renouard 2023-04-26 00:54:23 +02:00
parent 7b385a9518
commit 5ac9844030

View file

@ -1067,6 +1067,7 @@ sub select_csv_file {
$l =~ s/^/"/;
$l =~ s/$/"\n/;
print $fh $l;
print $l if $opt{debug};
}
close $fh;
}