Foro - Perl en Español

Estimados:

Busqué en el foro alguna forma de descargar un archivo Excel, y encontré Esto.

Lo modifico para poder descargar un .xls, ya que el .csv retorna una tabla con comas. Esto lo logro utilizando Spreadsheet::Write.



El problema es que no aparece nada en el archivo Excel, todo vacío. He probado montones de formas, pero nada :s. No así, sí genero el csv, ya que lo descarga correctamente, y con datos.

Ambos archivos, .csv y .xls los genera correctamente, es un problema en la descarga del archivo.


¡¡¡Help please!!!

Creo que falta las líneas

entre el open() y el while(). No está en el código original, y sí que es necesario: el fichero Excel es binario, y hay que leerlo y escribirlo como tal.

Casi mejor que el bucle while(), sería mejor leer todo el fichero de golpe:


Si no te gusta usar el módulo CGI, puedes quitarlo y cambiar las líneas del header() por las que pusiste antes. Lo principal es ver la forma de leer y enviar el fichero.

Explorer:

Le cambié

-Disposition

por

'Content-Disposition'

, ya que de otra manera, al descargar me dice en vez de prueba.xls, informe.cgi.

El problema era que no estaba cerrando el Excel una vez creado, pero por default al parecer se cierra el archivo una vez saliendo del script, y como yo tengo todo en un solo script, tenía que cerrarlo primero.

Faltaba

Ahora, con esto y con lo que me dices, puedo descargar el Excel sin problemas

¡¡¡¡Saludos!!!!