Foro - Perl en Español

Como se comenta en un mensaje mío, en este hilo, ¿instalaste el módulo Spreadsheet::XLSX?

El problema no está en que sea del año 2007, sino que está en formato XLSX. Como se indica en el segundo párrafo de Spreadsheet::ParseExcel, no es capaz de leer los ficheros Excel 2007 Open XML (XLSX), por lo que recomienda usar el Spreadsheet::XLSX.

Spreadsheet::Read usará ese módulo, en caso de que la extensión sea .xlsx.

(Una vez más, Microsoft fastidiando a todo el mundo.)

Cambia A3 por 'A3' (las comillas).

Ya lo encontré... Has escrito

my $a3 = $ref->[1]{A3}, "\n";

debería ser

my $a3 = $ref->[1]{A3};

En cuanto a la pregunta, si puedes hacerlo todo desde un solo ejecutable, es más eficiente. Es decir, reducir el número de pasos manuales, y aumentar al máximo la automatización.

elistraus escribiste:Tengo una pregunta: a mi me llega un archivo xls o xlsx y desde ahí tengo que sacar solo dos campos numéricos que no tienen fórmula ni formateado. Entonces quería preguntar si se puede, mediante Perl transformar este archivo xls o xlsx en csv y así desde ahí buscar lo que se necesita?

Precisamente, la gracia de estos módulos es que no necesitas hacer esas transformaciones. Simplemente, el módulo se encarga de traducir el contenido propietario de Micro$oft en estructuras Perl, y así es facilísimo extraer información.

Yo suelo usar Spreadsheet::Read, que lee varios formatos (realmente, depende de otros módulos), y así se puede escribir programas independientes del formato de los archivos. Así, cuando el cliente se canse de tener que pagar licencias de Micro$oft Office por culpa del Excel, y pasarse a usar OpenOffice o LibreOffice, entonces solo tendremos que editar una línea en nuestros programas.