I've subsequently tried this on DBI 1.30, DBD::Oracle 1.12, Perl 5.8 and 
Oracle 9.2.  Unfortunately I get the same error :-(

I've also tried the dbh->do() method (clutching at straws).  Same again.

Steve

On Tuesday 22 October 2002 11:25, Steve Baldwin wrote:
> I'm writing a perl script that reads the source of a PL/SQL package from a
> file, pre-processes it, optionally wraps it (using Oracle's wrap utility),
> and then executes it in the DB.
>
> If I don't wrap the file, everything works fine.  However, if I do wrap it,
> I get the following error from the prepare method ...
>
> Can't mix placeholder styles (:foo/:1) at
> /usr/local/lib/perl5/site_perl/5.6.0/i386-sco/DBD/Oracle.pm line 293
>
> I somehow need DBD::Oracle to not scan the statement for bind variables,
> coz there aren't any.
>
> We're using DBI 1.14, DBD::Oracle 1.03, Oracle 7.3.3 (in case that makes
> any difference).
>
> Any clues ???
>
> Steve
>
> P.S.
> Here is a subset of the wrapped code ...
>
> create or replace package sb_test_p wrapped
> 0
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> abcd
> 9
> 200f000
> 1
> 4
> 0
> 6
> 7 PACKAGE:
> 9 SB_TEST_P:
> 8 FUNCTION:
> 2 F1:
> 6 RETURN:
> 6 NUMBER:
> 0
>
> 0
> 0
> 12
> 2
> 0 a0 1d 97 a0 8d a0 b4
> a0 2c 6a a0 :2 aa 59 58 17
> b5
> 12
> 2
> 0 3 7 8 10 14 21 25
> 26 2a 2e 32 36 38 3a 3d
> 40 47
> 12
> 2
> 0 :2 1 9 2 b e 0 15
>
> :2 2 5 :6 1
>
> 12
> 2
> 0 :3 1 :3 2 0 :3 2 3 :6 1
> 49
> 2
>
> :3 0 1 :4 0 2 :6 0 1 3 :3 0
>
> 4 :a 0 a 2 5 :4 0 6 :3 0
> 7

Reply via email to