Re: :PgSQL: More Queestions

On Thu, 21 Nov 2002, Adam Witney wrote:

> One thing you may want to keep in mind is the situation concerning array
> slices
> 
> If you send a statement like this
> 
> my $sth = $dbh->prepare("select cube[1:2][1][1] from test4");
> 
> Then the :2 gets treated as a placeholder and gets substituted. From the
> trace

Ugg.

Maybe as a possible idea, what do you think?

--- dbdimp.orig Thu Nov 21 15:51:06 2002
+++ dbdimp.c    Thu Nov 21 15:56:24 2002
@@ -692,6 +692,8 @@        if (*src != ':' && *src != '?') {            if (*src == '\'' || *src == '"') {
 in_literal = *src;
 
+            } else if ('[' == *src) {
+               in_literal = ']';            }            *dest++ = *src++;            continue;
@@ -1139,6 +1141,8 @@            if (*src != ':' && *src != '?') {                if (*src == '\'' || *src == '"') {
               in_literal = *src;
 
+                } else if ('[' == *src) {
+                   in_literal = ']';                }                *dest++ = *src++;                continue;


Untested, but compiles. :) (well I did do a quick test on your above stmt 
and it works for that one, but may break other things. YMMV)


> 
> dbd_st_execute: statement = >select cube[1NULL][1][1] from test4<
> ERROR:  parser: parse error at or near "NULL" at character 14 error 7
> recorded: ERROR:  parser: parse error at or near "
> NULL" at character 14
> 
> As no parameters have been bound to the placeholder then a NULL is
> substituted and so it fails.
> 
> Or maybe I was doing it wrong and there is a way to get around this already?
> 

As a quick workaround $dbh->prepare("cube[1:?][1][1]"); make '2' your
first param to execute()


-r