• Publicidad

Fecha actual 2025-02-05 10:44 @489

News News of Foro - Perl en Español

Site map of Foro - Perl en Español » Foro : Foro - Perl en Español

La comunidad de programadores en Perl de habla-hispana.

Problema de los filósofos comensales

Hola a todos
Bueno me han dicho que realice un programa para el problema de los filósofos comensales con "threads". Estoy empezando a desarrollarlo en Perl pero la verdad que soy nuevo en este lenguaje y como que no entiendo bien cómo usar hilos y buscando en Internet he encontrado muy pocos ejemplos sobre esto, sobretodo "sincronización de hilos"; agradecería mucho si alguien me pudiera proporcionar un manual relacionado con este tema.

Gracias de antemano ...
Read more : Problema de los filósofos comensales | Vistas : 11526 | Respuestas : 8 | Foro : Intermedio


Problema con Perl & snmptt

Hola estamos instalando snmptt en una Debian, cuando quiero lanzar la aplicación...

/usr/sbin/snmptt -dump

nos sale el siguiente error ...

Code: Seleccionar todo
Can't locate version.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 /usr/share/perl/5.8/Text/Balanced.pm line 13.
BEGIN failed--compilation aborted at /usr/share/perl/5.8/Text/Balanced.pm line 13.
Compilation failed in require at /usr/sbin/snmptt line 309.
BEGIN failed--compilation aborted at /usr/sbin/snmptt line 309.


Tenemos instalado el Perl y los módulos pero el Text::Balanced cuando lo cargamos ...
Read more : Problema con Perl & snmptt | Vistas : 1951 | Respuestas : 5 | Foro : Módulos


ANSI escapes y VT para "emular" (n)curses

Bueno, me ha dado por jugar con VT100 y superiores, con ANSI escapes y se me ocurrió "emular" (n)curses con ésto.

¿Qué dicen, sería interesante o muuuuy mala idea?

Y sí, ya se que existe curses para Perl en CPAN :)

http://www.termsys.demon.co.uk/vtansi.htm
Read more : ANSI escapes y VT para "emular" (n)curses | Vistas : 4307 | Respuestas : 11 | Foro : Avanzado


Por si se pierde tu cargador

Sé que esto poco o nada tiene que ver con Perl pero creo yo que es un dato curioso que puede servir a muchos y es que el otro día en la oficina en mi tiempo libre estaba viendo unos vídeos de hacer un mechero con una papa y pasta de dientes y una lámpara con el cable USB. A lo que pensé si se puede hacer una lámpara por qué no un cargador. Así ...
Read more : Por si se pierde tu cargador | Vistas : 2828 | Respuestas : 2 | Foro : Pasando el rato


Arreglo como parámetro

Agradecería si me pudiesen indicar cómo leo los datos de un arreglo que ha sido pasado como parámetro.

Es decir, mi script recibe un parámetro que es un arreglo de elementos y quiero leer sus datos.

El SCRIPT que envía el arreglo tengo:

hidden(-name=>'array_materiales', -default=>@array_materiales)

El SCRIPT que recibe:

import_names('Q');
my @array_materiales = $Q::array_materiales || "";


Muchísimas gracias. :D
Read more : Arreglo como parámetro | Vistas : 4579 | Respuestas : 6 | Foro : Avanzado


GPG en Perl

Los molesto nuevamente, pero en este caso para consultarles si alguien tiene algún ejemplo para poder cifrar archivos con gnupg (gpg).

Gracias
Read more : GPG en Perl | Vistas : 722 | Respuestas : 1 | Foro : Intermedio


Aplicar un comando a todos los archivos de un directorio

Buenas, en este caso les escribo con el fin de consultarles cómo puedo hacer para aplicar un comando sobre todos los archivos de un directorio.

Por ejemplo quiero duplicar los archivos de un directorio.

Tipo,
Code: Seleccionar todo
cp archivo archivo_copia


Gracias
Read more : Aplicar un comando a todos los archivos de un directorio | Vistas : 858 | Respuestas : 2 | Foro : Básico


Sockets en Perl: No puede conectar

Estoy intentando aprender por encima cómo programar Sockets en perl y no me funciona ni tan solo el programa ejemplo más simple que he encontrado:

#!/usr/bin/perl -w
use IO::Socket;
$sender = new IO::Socket::INET (
PeerAddr => 'localhost' ,
PeerPort => 1999,
Proto => 'tcp',
);
die "No se puede abrir el socket, Motivo: $!\n" unless $sender;
print $sender "MSG : enviando mi mensaje\n";
close $sender;

Para probarlo, por un lado abro una escucha en el ...
Read more : Sockets en Perl: No puede conectar | Vistas : 6489 | Respuestas : 30 | Foro : Intermedio


Incluir un pl dentro de otro

Necesito incluir un archivo .pl dentro de otro para utilizar su código, estoy usando el Open Perl IDE 1.0.1.409 para Windows. Por favor, pido ayúdenme en esto. Desde ya, gracias.
Read more : Incluir un pl dentro de otro | Vistas : 885 | Respuestas : 1 | Foro : Básico


Variables y html

Tengo un problema al incluir html en la variable:

$mensaje=" <html><head><style type="text/css">
<!--
body,td,th {
color: #FFFFFF;
}
body {
background-color: #000000;
}
-->
</style><title>prueba!</title></head><body>

<div align="center">
<p><strong>prueba!</strong></p>
<p><strong><img src="http://img502.imageshack.us/img502/244/espanaxr0.jpg"></strong></p>
<p><strong>prueba</strong></p>
<center>---------------------------------</center>
<p><strong>prueba!!!</strong></p>

</div>
</body></html> ";

open (PAGINA, ">sphate.html");

print PAGINA $mensaje;

Seguro que me faltan algunas comillas o algo, para señalar al interprete que es código HTML y no Perl.
Read more : Variables y html | Vistas : 4154 | Respuestas : 4 | Foro : Básico


 

Identificarte  •  Registrarse


Estadísticas

Mensajes totales 36890 • Temas totales 7432 • Usuarios totales 1981