#Freeze the object
my $data = eval { unpack ('h*', Storable::nfreeze($object))} ;

# ORACLE SPECIFIC
# create a hash containing specifying to Oracle what
# sort of data it will need to store. 112 is the value
# for a CLOB, 113 is the value for a BLOB.
# FIXME: make this a BLOB when DBD::Oracle supports that

my %hash = (ora_types => 112, ora_field => 'data');
# END ORACLE

# insert our values into the table
my $query = "INSERT INTO $table (jobID, data) VALUES ('$jid','$data')";

$db_handle->execute($query, \%hash);
 
# To thaw (after retrieving from the DB)
my $object = eval { Storable::thaw(pack('h*',$data)) }