2007-12-03から1日間の記事一覧

insert or update時

use DBD::Oracle qw/:ora_types/; $sth = $self->{dbh}->prepare($query); foreach (@$blob) { $sth->bind_param($_, $val->[$_], { ora_type => ORA_BLOB }) }; foreach (@$clob) { $sth->bind_param($_, $val->[$_], { ora_type => ORA_CLOB }) }; $sth->e…

select時

$self->{dbh}{LongReadLen} = $self->{max_lob_size} * 1024 if ($param->{blob} or $param->{clob});

LOBの扱い

やっぱりちょっとはまったのでメモ(というかコードの断片貼り付け)。