> Versions: DBI 1.20 and DBD::CSV 0.1027
> So I fixed the problem.
Well, not exactly. Posted too soon...
Here's the new, *working* patch:
*** DBI-1.20/lib/DBI/Shell.pm Fri Aug 24 17:11:05 2001
--- Shell.pm Thu Nov 29 14:44:37 2001
***************
*** 362,367 ****
--- 362,371 ----
$sh->{current_buffer} .= "$stmt\n" if length $stmt;
+ # Fixup quote escaping for DBD::CSV parser vs ANSI SQL parser
+ $sh->{current_buffer} =~ s/([^,]\s*)''(\s*[^,])/$1\\'$2/g
+ if $sh->{dbh}->{Driver}->{Name} eq 'CSV';
+
$cmd = 'go' if $cmd eq '';
my @args = split ' ', $args_string||'';
--- snip ---
Apologies,
Michael.
---------------------------------------------
Valuenet Web Mail.
http://www.valuenet.net/
