Foro - Perl en Español

Bueno, hola de nuevo, ya estoy de nuevo aquí (poco ha durado mi independencia... :lol: ).

Me gustaría poder sacar de una consulta SQL los nombres de las columnas para luego usarlos como cabeceras en un Excel, y no me sale, las expresiones regulares se me siguen resistiendo. :(

Ejemplo:
select idProd, nombre, fabProd from productos

my $querybbdd = ...

Hola,
Tengo un archivo que contiene procedimientos almacenados, algunos retornan un valor que ocupo utilizar en otro procedimiento más abajo.

Si uno hace copy y paste de los SP funciona todo correctamente, pero ¿cómo puedo hacer esto desde Perl, con DBI?

Hola, estoy empezando con Perl y este error no lo he podido sacar:

"Unrecognized character \xC2 at /var/www/vhosts/"... lo marca en la línea 477

y el pedazo de código es este

sub pagination {

my $category_id = shift; #linea 477
my $url_key  = shift;

He investigado un poco y se supone que es un carácter de un espacio, pero modifico, borro y no me funciona. La codificación que estoy utilizando es UTF-8, no BOM. ...

Saludos a toda la gente del foro,

Llevo unos pocos meses utilizando Perl en el proyecto en que trabajo actualmente, fundamentalmente para gestión de ficheros, cadenas de texto y accesos sencillos a base de datos en entornos Unix.

Casi siempre he trabajado en proyectos web, y el caso es que me gustaría crearme en casa una mini aplicación web en Perl para ver qué tal, y comparar con otros lenguajes y frameworks con los que ...

Hola a todos, espero que esto esté bien posteado aquí, tengo un problema con el siguiente código, espero me ayuden.

No sé qué tiene mal mi código, pero hay algo fuera de lo normal. Sé que no es el mejor código del mundo y yo soy muy principiante en esto. Les pego el código:

$scripts_dir = "/usr/local/bin/doc11";
open (ARCHIVO, "$scripts_dir/Equipos.txt");

$cant_equipos = 0;

@equipos=0;

while(<ARCHIVO>)
{
chomp;
my @line = split(/\t/);

$num_args = 0; ...

Buenas,

¿Alguien me puede decir cómo hacer para saber el tipo de datos de una variable? Es que dependiendo de éste tengo que realizar una determinada acción.

¡Gracias!

Hola,

Me gustaría encontrar una expresión regular que validara (en Perl) una URL de tipo FTP.
Por ejemplo: ftp://username:[email protected]/path1/example.txt

¿Alguien me puede ayudar?

Muchas gracias.

Buena tarde,

Estoy levantando un servidor DHCP pero necesito saturarlo para ver la capacidad de respuesta y si tiene la capacidad de entregarme las direcciones que le estoy definiendo en el pool. Si tuvieran algún script para poder lograr esto, de antemano muy agradecido.

Buenas... tengo un problema que no logro resolver. Tengo el siguiente texto:
PING http://www.l.google.com (72.14.253.105): 56 data bytes

64 bytes from 72.14.253.104: icmp_seq=3 ttl=52 time=109.575 ms
64 bytes from 72.14.253.104: icmp_seq=4 ttl=52 time=113.299 ms
64 bytes from 72.14.253.104: icmp_seq=5 ttl=53 time=104.000 ms

que proviene de la ejecución del ping, pero necesito obtener algo de tipo

@arreglo= ("109.575","113.299","104.000");

¿Cómo se puede hacer?
Gracias por su tiempo.

Hola.. ¿cómo puedo ejecutar gnuPlot desde perl para realizar un gráfico?
Tengo éste código, que no me genera errores, pero no funciona.
qx(/usr/local/bin/gnuplot);

qx(set xlabel "Hora");
qx(set ylabel "Paquetes ");

qx(set output "/home/yo/test/loss1.png");
qx(set title "Paquete");
qx(set term png size 480,360);
qx(set xdata time);
qx(set timefmt "%H:%M" #%b-%d-%H:%M:%S");

qx(set style line 1 lw 1 pt 3);
qx(set style line 2 lw 1 pt 9);
qx(plot '/home/yo/test/loss.txt' using 1:2 with points t '' ls 1); ...