Dbix :: blob :: manejar Lea la base de datos Binarios de objetos grandes de los mangos de archivos
Descargar ahora

Dbix :: blob :: manejar Clasificación y resumen

Dbix :: blob :: manejar Etiquetas

Módulo perl perla asas de archivo Binarios de objetos grandes de bases de datos

Dbix :: blob :: manejar Descripción

Lea la base de datos Binarios de objetos grandes de los mangos de archivos Dbix :: blob :: mango es un módulo de Perl que construye un archivo de fila atado que también se extiende desde IO :: Mango e IO :: seleccionable.dbi tiene un método blob_copy_to_file que toma un argumento de identificación de archivo y copia una base de datos de un objeto grande binario (LOB ) A este asa del archivo. Sin embargo, el método es indocumentado y defectuoso. Construir un método similar usted mismo es bastante simple, pero ¿qué sucede si desea leer los datos y realizar operaciones en ella? Puede usar el método Blob_Read de DBI usted mismo para procesar los trozos de datos del LOB o incluso descargar su contenido en un escalar, pero tal vez sea bueno leer la línea de datos por línea o pieza de una pieza de un antiguo FileHandle "! DBIX :: Blob :: Mango es un módulo PERL que construye un archivo de fila atado que también se extiende desde IO :: Mango e IO :: seleccionable. Envuelve el método Blob_Read de DBI. Al hacer lo dispuesto en LOU como un asa de archivo para leer, podemos procesar los datos de una manera familiar (perry). ADICIONALMENTE, haciendo que el módulo sea respeto $ / y $. Luego podemos leer líneas de datos de texto de un LOB textual (CLOB) y tratarlo, como lo haríamos como cualquier otro mango de archivo. Sinopsisuse DBI; Use DBIX :: BLOB :: Manija; # Use DBIX :: BLOB :: Manija QW ( : En_statement); $ dbh = dbi-> connect ('dbi: oracle: orcl', 'Scott', 'Tiger', {RairError => 1, PrintError => 0}) o Die 'No se pudo conectar a la base de datos:' , Dbi-> errars; $ dbh -> {longtruncok} = 1; # ¡Muy importante! $ sql = 'Seleccione MyLOB de MyTable donde id = 1'; $ sth = $ dbh-> prepararse ($ sql); $ sth-> ejecutar; $ sth-> fetch; $ fh = dbix :: blob :: Manejar-> Nuevo ($ sth, 0,4096); ... Imprimir Mientras <$ fh>; # Imprimir $ fh-> Getlines; Tamaño de la vangreta de impresión fue '. $ fh-> dile. "Bytes "; ... # Lea el tamaño de búfer predeterminado # más rápido de procesar un LobPrint $ Chunk mientras se lee ($ FH, $ Chunk, UNDEF); ... # Forma más rápida de leer un LOB en un Scalarlocal $ /; $ blob = <$ handle>; ... # o si usamos el peligroso: en_statement pragma, # podríamos decir: # $ fh = $ sth-> blob_as_handle (0,4096); ... $ sth-> acabado; $ dbh -> Desconectar; Requisitos: · Perl

Dbix :: blob :: manejar Software relacionado