debug with csv lines
This commit is contained in:
parent
7b385a9518
commit
5ac9844030
1 changed files with 1 additions and 0 deletions
|
@ -1067,6 +1067,7 @@ sub select_csv_file {
|
|||
$l =~ s/^/"/;
|
||||
$l =~ s/$/"\n/;
|
||||
print $fh $l;
|
||||
print $l if $opt{debug};
|
||||
}
|
||||
close $fh;
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue