bind var trailing blanks chopped on insert w/Oracle

[Mark Dedlow]

Using oracle 8.1.7, perl 5.6.1, DBD::Oracle 1.12.

When I do an insert like this below on CT.COL, a varchar2(10):

   $c = $dbh->prepare( 'insert into ct (COL) values (?)');
   $c->execute('bind ');

The trailing blank doesn't make it to the db.  Doing the functional
equivalent using native oracle tools works correctly.

Anyone know where this problem lies?

Here's a relevant trace excerpt:


-> prepare for DBD::Oracle::db (DBI::db=HASH(0x31dd94)~0xf5bf4 'insert into
ct values (?)')
  dbd_preparse scanned 1 distinct placeholders
<- prepare= DBI::st=HASH(0x2f8e48) at dbh.pl line 27
-> execute for DBD::Oracle::st (DBI::st=HASH(0x2f8e48)~0x2f8e9c 'bind ')
     bind :p1 <== 'bind ' (type 0)
     bind :p1 <== 'bind ' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
dbd_st_execute INSERT returned (SUCCESS, rpc1, fn3, out0)
<- execute= 1 at dbh.pl line 28


Help appreciated.

Mark