Date: Thu, 21 Nov 2002 19:52:19 +0000
From: Tim Bunce <Tim.Bunce@pobox.com>
To: Rudy Lippan <rlippan@remotelinux.com>
Cc: Adam Witney <awitney@sghms.ac.uk>,
	David Wheeler <david@wheeler.net>, dbi-dev@perl.org,
	pgsql-interfaces <pgsql-interfaces@postgresql.org>
Subject: Re: :PgSQL: More Queestions
Message-ID: <20021121195219.GQ17107@dansat.data-plan.com>
References: <BA026BAC.BF01%a.witney@sghms.ac.uk>
	<Pine.LNX.4.44.0211211357560.21197-100000@elfride.ineffable.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
In-Reply-To: <Pine.LNX.4.44.0211211357560.21197-100000@elfride.ineffable.net>
User-Agent: Mutt/1.4i

Or ignore colons that have a digit as the previous character
as that would never be a placeholder.

Tim.

On Thu, Nov 21, 2002 at 02:20:52PM -0500, Rudy Lippan wrote:
> 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
>