> > Versions: DBI 1.20 and DBD::CSV 0.1027
> Well, not exactly. Posted too soon...
Almost right. I added in some allowances for multi-line SQL statments...
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/([^,\(\r\n]\s*)''(\s*[^,\r\n\)])/$1\\'$2/gs
+ 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/
