Foro - Perl en Español

Bienvenido a los foros de Perl en Español, jortiz_90.

Spreadsheet::Read leerá toda el libro Excel a memoria, con lo que ahí tienes la ganancia de velocidad. Podría haber alguna limitación en cuanto al tamaño máximo del libro, pero para eso hay que leer los consejos que vienen en Spreadsheet::ParseExcel (módulo que usa Spreadsheet::Read para leer los Excel).

Otras opciones... como dices que lo que quieres es sacar información desde la hoja, podrías mirar el módulo DBIx::Report::Excel que justo eso: sacar informes desde una hoja Excel usando sentencias SQL. Este módulo hace uso del Data::Tabular::Dumper::Excel, que extrae la información de la hoja, en estructuras de datos de dos o tres dimensiones. En cambio, DBD::Excel sigue en estado alfa desde hace un montón de años...

Yo suelo usar Spreadsheet::Read, ya que, además de tener un interfaz sencillo, si un día el cliente se cansa de pagar por Excel y se pasa a OpenDocument, solo tendría que cambiar 3 caracteres en mi código ('xls' -> 'ods').

Pues no lo sé, pero es fácil hacer unas pruebas de velocidad... consiste en instalar los módulos, y hacer un programa que realice unas pruebas...

Esa función es llamada por el analizador. Es ejecutada por cada celda leída. Lo tienes explicado con este ejemplo en la sección Reducing the memory usage of Spreadsheet::ParseExcel:

Fíjate: el método parse() lanza el proceso de interpretación del fichero indicado. Y en cada celda, cell_handler() es llamado con 5 parámetros: libro, número de hoja, fila, columna, y la propia celda. Lo que haga cell_handler() con la celda, ya es cosa tuya: almacenarla, cambiarla o desecharla. Nota además, que en el ejemplo se le ha pasado la opción NotSetCell => 1, que le indica a ParserExcel que no almacene el valor de la celda, lo que implica que deja en nuestra completa responsabilidad cómo almacenar la celda, dentro de cell_handler(). Podríamos crear una estructura tridimensional propia e ir guardando las celdas en ella, en lugar de depender de las estructuras de ParseExcel.

El porqué lo recomienda es porque en algunas ocasiones, la lectura de algún libro Excel puede llegar a agotar la memoria del equipo: por cada celda, ParseExcel guarda el valor de la celda y todos los atributos de formateo de la celda. Si, en cambio, la celda nos la pasa a nosotros en el cell_handler(), podemos decidir qué guardar y qué no.

Yo suelo hacer las siguientes operaciones:

1.- Creo un objeto Spreadsheet::Read con el nombre del libro Excel. En ese momento, todo el fichero pasa a memoria a una estructura tridimensional (se puede configurar cómo crearla).

2.- En la hoja que quiero tratar, leo la primera fila (con row()) y creo un hash que me relaciona el nombre de la columna con el índice de la columna (de esa manera, si el cliente cambia el orden de las columnas, el resto del programa no queda afectado).

3.- En ocasiones suelo poner una función más que me devuelve un hash que relaciona el nombre de la columna con el contenido de la celda correspondiente, para cada fila. De esa manera, para cada fila, puedo acceder a una celda indicando su título: $celda{'titulo'}

4.- Uno de los atributos que tiene cada hoja es el número máximo de filas, así que puedo realizar un bucle del 2 al máximo de filas para recorrer toda las filas (he dicho 2 porque la 1 es la fila de titulares) (existe otro atributo que indica el máximo de columnas)

5.- Puedo acceder a la hoja por medio de referencias: $hoja->{A5}, o por coordenadas: $hoja->{cells}[1][5].

Yo no me metería en historias de cell_handle() salvo en el caso de que tuviera un fichero Excel de millones de celdas.