Foro - Perl en Español

Hola compañeros perleros, me alegro de entrar en este foro y enviaros mi primer post. Soy novato en esto y acabo de empezar, pero espero que con el paso del tiempo y las ayudas de este foro pueda avanzar en la materia.

Os cuento, trabajo en bioinformática con análisis de secuencias biológicas y Perl y me ha surgido un problema. Pero antes de nada, para que veáis cómo son los datos que empleo os pongo ...

Que tal.

El problema que tengo es que cuando ejecuto cgi en Perl, checo los log (/var/log/httpd) y al menos me genera un log como de 1 Mb. Ya he intentado varias cosas para evitar que estos archivos se llenen lo menos posible. Uno de los warnings más comunes que me manda son estos:

[Tue May 08 15:42:07 2007] [error] [client 130.10.15.5] [Tue May 8 15:42:07 2007] llamadas_horas.cgi: Use of uninitialized value in addition (+) ...

Hola amigos, veréis, tengo que hacer un trabajo para la facultad, algo sencillo, un benchmark portable; debe ser en Perl por lo que necesito algo de ayuda (yo controlo c, c++, java).

He visto que existe un módulo llamado benchmark con el que puedes medir el tiempo que tarda en hacer algo determinado; necesito saber si se puede hacer algo como medir cuántos bloques de datos se pueden escribir en disco por espacio de tiempo, ...

¡hola!

Mi duda es la siguiente:
Necesito alguna función que me permita obtener el nombre de la máquina en la cual estoy ejecutando mi programa Perl para, en función del nombre, realizar una serie de pasos.
Gracias por su ayuda.

Cómo crear números aleatorios rand sin que se dupliquen.

Hola amigos.

Quiero ejecutar el comando DIR con las comillas ` y lo hago así:

$dirResults = `dir /ad /B C:\\Releases\\TEST\\2.1.1002\\rod*.`;

El problema es que cuando DIR no encuentra algo, manda a la pantalla
"File not Found" pero no lo manda a la variable....

Mi duda es cómo puedo hacer que este mensaje no me salga en la pantalla.

¡Gracias saludos a todos!

Buenas :
Mi pregunta es la siguiente. En un fichero txt tengo guardado cuentas y logins de diferentes usuarios. Lo que tengo que hacer es conectarme al servidor a través de una cuenta y de un login pero solo si el fichero tiene los permiso -r--------, es decir, solo puede leerlo el dueño del fichero. ¿Cómo puedo saber esto a través de Perl?
Gracias
Saludo

Espero que alguien me pueda ayudar:
Cada vez que intento ejecutar un script de Perl en la línea use tk me da el siguiente error en consola :

Code: Seleccionar todo

blanca@blanca-laptop:~/Desktop/server$ ./tk.pl
Can't locate Tk.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.8.8 /usr/local/share/perl/5.8.8 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.8 /usr/share/perl/5.8 /usr/local/lib/site_perl .) at ./tk.pl line 2.
BEGIN failed--compilation aborted at ./tk.pl line 2.

¿Alguien me puedo ayudar?
Gracias

Code: Seleccionar todo

Subroutine menu redefined at script.cgi line 58.
Variable "$ruta_cgi" will not stay shared at /home/perico/public_html/perl/script.cgi line 66.
Subroutine menu redefined at /home/perico/public_html/perl/script.cgi line 64.
Variable "$ruta_cgi" will not stay shared at /home/perico/public_html/perl/script.cgi line 91.
Subroutine registro_usuario redefined at /home/perico/public_html/perl/script.cgi line 89.

Me aparece ese error. ¿Qué quiere decir?

Buenas :
Es la primera vez que escribo en este foro, tengo una serie de preguntas por favor:
Me gustaría desarrollar un cliente / servidor Pop 3 en Perl sobre UNIX. Me gustaría saber cómo y dónde puedo encontrar las funciones utilizadas tanto por el cliente como el server.
Muchas gracias
Saludos
Manu