or download this
# Build a large XML document, bind it as a CLOB,
# extract elements through PL/SQL and return as a CLOB
...
$sth->bind_param( ':in', $in_clob, { ora_type => ORA_CLOB } );
$sth->bind_param_inout( ':out', \$out_clob, 0, { ora_type => ORA_CLOB
+} );
$sth->execute;