Re: return CLOB via Perl/DBI

Using the following code I get the error,

DBD::Oracle::db prepare failed: ORA-03115: unsupported network datatype or repre
sentation (DBD: odescr failed) at clob.pl line 26.

It works if I use dbms_lob.substr( comments, 30000, 1). But then I am limited to 30000.

$dbh->{LongReadLen} = 512 * 1024 ;
$dbh->{LongTruncOk} = 1;

        $sth1 = $dbh->prepare(q{
               SELECT cd_type, comments
               FROM comments WHERE id_comment = 53
       });

       $sth1->execute();

        while ( ($name, $data) = $sth1->fetchrow_array ) {

                print "row = $name $data \n";

        }