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