Foro - Perl en Español

Creo un archivo xls con el módulo Spreadsheet::WriteExcel. Puedo verlo y se crea bien. Mi problema es que quiero abrir ese archivo desde un cgi, y este no se abre.


#!/usr/bin/perl -w

use strict;
use CGI ':all';
use Spreadsheet::WriteExcel;

# Suponiendo creado OK el archivo prueba.xls, Luego:

open (FILE, "/tmp/archivos_xls/prueba.xls");
local ($/);
my $file = <FILE>;
close (FILE);

print "Content-type: application/vnd.ms-excel\n";
print "Content-Disposition: attachment; filename='prueba.xls'\n";
print "Content-Description: File to download\n\n";

print $file;


...

Hola compañeros,

¿Cómo abrirías un fichero csv (datos.csv), eliminarías las comillas de los datos (columnas/filas), y reemplazarías las comas por puntos, y grabarías el resultado de nuevo en el fichero, y no por consola, en un script?

Saludos y gracias.

«Desde hace algún tiempo desarrollé cierta curiosidad por aprender Perl, me parece un lenguaje fenomenal, con posibilidades inmensas, además muy divertido.

Hoy quiero presentar el como iniciar desarrollos Perl en Mac OS X aprovechando claro el apache2 instalado en el sistema.»

Artículo

Hola, buen día.

Tengo tiempo visitando el foro y me ha servido de mucho en este camino de aprendizaje. En esta ocasión escribo para solicitar ayuda con un problema que tengo al momento de agrupar la información que leo de un archivo, estos son los datos de entrada.

SDAPQ111111|9502|2678402|1|Cap. Adicional|20120125|
SDAPQ111111|9502|2678402|1|Cap. Adicional|20120126|
SDAPQ111111|9502|2678402|1|Cap. Adicional|20120127|
SDAPQ111111|9502|2678402|1|Cap. Adicional|20120128|
SDAPQ111111|9502|2678402|1|Cap. Adicional|20120129|
SDAPQ111111|9502|2678402|1|Cap. Adicional|20120130|
SDAPQ111111|9502|2678402|1|Cap. Adicional|20120131|
SDAPQ111111|9502|2678402|5|Cap. Adicional|20120115|
SDAPQ111111|9502|2678402|5|Cap. Adicional|20120116|
SDAPQ111111|9502|2678402|5|Cap. Adicional|20120117|
SDAPQ111111|9502|2678402|5|Cap. Adicional|20120118|
SDAPQ111111|9502|2678402|5|Cap. Adicional|20120119|
SDAPQ111111|9502|2678402|5|Cap. Adicional|20120120|
SDAPQ111111|9502|2678402|5|Cap. ...

Estimados,
les planteo una duda, ya que creé un script más que sencillo, el cual consulta a una tabla MySQL llena un archivo de texto plano, pero al momento de ejecutar el script me sale el siguiente warning: Use of uninitialized value in concatenation (.) or string at conecta_bd.pl line 22.
Use of uninitialized value in concatenation (.) or string at conecta_bd.pl line 22..

He revisado el código y no logro ver dónde está el ...

Estaba viendo unos códigos en AutoIT. ¿Alguien me podría decir su opinión sobre este lenguaje?

«Como ocurre siempre en Perl, hay varias maneras posibles de hacer una misma cosa. en este artículo comentamos las distintas formas de lanzar la ejecución de un comando externo desde un script perl.»

Artículo

«En algunos casos, el programador se encuentra con que debe procesar ficheros de un gran tamaño (por ejemplo, los ficheros de log de un servidor web).

Pero para algunos efectos, como puede ser la generación de un informe estadístico, no es necesario realizar el proceso del todo el fichero. En su lugar, una muestra suficientemente representativa es suficiente para generar un resultado aceptable, reduciendo el tiempo de proceso.

Para ello una condición normalmente necesaria es ...

«Un caso típico en donde puede ser necesario establecer un tiempo límite de respuesta es el de un servidor que se comunica con uno o varios clientes a través de la red.

El servidor envía mensajes a los clientes, y espera a que éstos respondan. Pero puede haber problemas de red, o bien alguno de los clientes no responde por alguna otra razón, y esto no debe bloquear la ejecución del servidor para el resto ...

«La función “alarm” de perl permite ejecutar una subrutina cuando ha transcurrido el tiempo que se le ha indicado como argumento.

Haciendo uso de ella, podemos implementar una función para solicitar una respuesta al usuario, pero si éste no responde pasado un tiempo, continúa la ejecución del script.»

Artículo