Foro - Perl en Español

Buenas, he visto muchas subrutinas y la mayoría utiliza la función return(), pero no entiendo bien el funcionamiento. Leí el tutorial acerca de ellas y no entendí mucho lo que digamos, a ver si podés darme algunos ejemplos.

Saludos.

Hola,

me gustaría saber si es posible usar el contenido de una variable como parámetro de entrada a una llamada al sistema, por ejemplo:

system("nombre_funcion <" . $variable)

Es decir, en vez de recoger los datos del teclado, que los coja de la variable.

¡Muchas gracias!

Hola, quiero saber cómo detectar el sistema operativo o un módulo que lo haga.

Saludos.

Hola a todos.

¿¿Se pueden anidar subrutinas?? He leído en Google que da problemas.

Y aprovecho para realizar una pregunta de concepto: si tienes un programa algo amplio, ¿cómo lo diseñáis? Todo en un único ejecutable, creáis varios ejecutables, etc...

Muchas gracias.

Un saludo,
Ricar.

Hola.

Estoy haciendo un programa para verificar procesos de virus. Lo que ya tengo es:


use Win32::Process::List;

@procesos = ( "absr.exe" , "aconti.exe" , "adaware.exe" , "adobes.exe" , "adp.exe" , "Advapi.exe" ,
"backweb.exe" , "bargains.exe" , "bndt32.exe" , "boot.exe" , "bpc.exe" , "brasil.exe" , "cekirge.scr",
"cmd32.exe", "cme.exe", "cmesys.exe", "cnbabe.exe", "comcfg.exe" , "command.exe",

"cpumgr.exe", "ct_load.exe", "ctbclick.exe", "cuo.exe", "ddhelp32.exe", "desire.exe", "directx.exe",
"dlder.exe", "dlgli.exe", "dllmem32.exe", "dllreg.exe", "dssagent.exe", "dw.exe" , "dxupdate.exe" ,
"enbiei.exe", "expl32.exe", "explore.exe", "fhfmm.exe", "flydesk.exe", "gain_trickler_exe" ...

Hola.

Les escribo para lo siguiente:

Tengo varios hash de hashes; con los valores de los mismos necesito hacer algunas comparaciones y contabilizarlas. Al final con los resultados de las comparaciones deseo obtener una matriz. A continuación coloco un segmento de la salida de la impresión de los hash de hashes y el código que estoy utilizando:

Esta es la salida de los hash de hashes
2hbsA 97 0.196 1 -3.769
2hbsA 98 0.126 1 ...

Hola.

Ando programando un pequeño programa que trabaja con Tk. Éste espía canales IRC e imprime lo sucedido en un ROtext.

El problema es que cuando minimizo la ventana es como si se tildara y está se volviera blanca y aparece "no responde".

¿Alguien me podría explicar por qué pasa eso y cómo lo soluciono?

Buenas a todos, tengo un problema; es que quiero hacer diferentes peticiones y para ahorrar las líneas y el trabajo, mejor pensé crear una función que haga las peticiones web y usarla en cada petición. Un ejemplo malo podría ser.

use LWP::UserAgent;
use HTTP::Request;

sub google-es{
my $ua = new LWP::UserAgent;
$ua->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201 Firefox/2.0.0.12");

my $busqueda = new HTTP::Request GET =>"http://www.google.es";
my $resultado = $ua->request($busqueda);
$ua->timeout(7) || ...

Hola. Soy nueva en esto del Perl y la verdad es que tengo algún problemilla.
Me han pasado este programa que calcula la moda de una serie.

Entiendo que foreach() funciona para ir recorriendo la lista. El problema lo tengo en la línea siguiente.

Haciendo un print() de b (dentro del bucle) veo que es como un sumatorio de las veces que aparece cada número, pero no entiendo cómo lo hace.

Si alguien me puede ...

¡¡¡Hola!!!

Quisiera saber cómo puedo implementar un servicio web en Perl.

Sé que necesito el SOAP::Lite pero sinceramente soy nueva en Perl y no sé cómo empezar.

Ojalá puedan ayudarme. Muchas gracias.