Foro - Perl en Español

¿Cómo crear un programa que descomprima un archivo al bajarlo de Internet e insertarlo en una ubicación? ¿Algún ejemplo? gracias...

Hola a todos,

Tengo una duda que quizás podáis resolverme, y que me esta dando dolores de cabeza:

my $outKey = &func();
if (defined $outKey) {
my @outList = qw(CLT DFF DFM);
if (grep(/$outKey/,@outList )) {return 1;}
}
else {return 1;}

El caso es que tengo este pequeño trozo de código.

En $outKey, recupero una cadena de caracteres determinada, la cual puede contener todo tipo de caracteres, incluso caracteres reservados para las regexp de Perl. ...

Hola, acabo de empezar en esto de Ajax y uso la librería Xajax, y quisiera hacer unas pestañas o tags con ella, pero no tengo mucha idea, ¿alguien podría ayudarme o darme la dirección de un ejemplo ya hecho? (si pudiera ser en xajax mejor, pero si es en Ajax usando otra librería también podría servirme para ir viendo cómo se hace).

Muchas gracias. Un saludo.

Hola a Todos ¿Alguien conoce un módulo como el gtk2-html para Perl, que interprete el código de XML y lo muestre en un browser, así como lo hace el gtk2-html para Perl con el código html?

De antemano gracias por la ayuda.

Eddy

Hola a todos,

El caso es que tengo un problema que me está volviendo loco...

Tengo un proceso padre que espera en un bucle por la finalización de los procesos hijos. Algo así como:

# We wait until all the children have finished
while($nbProc > 0) {
&waitEndOfChild(\$nbProc);
}

donde $nbProc es un contador con el número de procesos hijos todavía ejecutándose.

Y he aquí el código de la función waitEndOfChild, ejecutada por el proceso ...

Hola a todos soy nuevo en Perl, en la empresa donde trabajo , se me ha encomendado realizar un sistema bancario alterno al que tenemos pero quieren que sea via web , y pues indagando sobre lenguajes de programacion me intereso Perl como alternativa para desarrollar el proyecto , pero tengo dudas sobre que herramientas o que complementos de perl debo usar , el sistema debe tener una seccion de login al sistema , permisos ...

Hola a todos.

Me han mandado una práctica que consiste en lo siguiente:

• Tengo un primer archivo con palabras que debo eliminar. Ejemplo: desde, con, un, una, luego, entonces, para, así, etcétera.
• Tengo un segundo archivo en el cual debo eliminar todas las palabras anteriores. Ejemplo: "con dinero compro una casa" ---> "dinero compro casa"

Yo estoy haciendo dos bucles while, uno que lea cada palabra a eliminar y en el segundo, por cada ...

Lo que intento hacer es abrir un archivo de texto en modo lectura, donde hay almacenadas URL y capturar cuantas lineas los componen. El fichero tiene esta estructura:

Code: Seleccionar todo

URL1
URL2
...

Para después imprimirlas una a una dentro de un bucle.

$archivo=$ARGV;

open (txt,"$archivo");
@webs=<txt>;

for ($i=@webs;$i<@webs;$i++)
{
print @webs;
}

Tengo un script que se ejecuta cada X cantidad de tiempo y quiero que chequee que algunos servicios (httpd, mysql, postfix, dovecot...) estén funcionando bien...

¿Cómo lo harían? ¿Con `service httpd status` o conectándose directamente a los servicios desde módulos como el LWP?

Saludos.

Hola a todos.

¿Alguien sabe cómo puedo comprobar si un string (para mi caso $linea (está partida con split)) empieza con unos caracteres en concreto?

Lo que quiero hacer es comprobar si dicho campo ($linea) empieza por 0,1 o 2.

Muchas gracias por vuestra colaboración.