Foro - Perl en Español

Necesito saber cómo puedo llamar desde mi página web un servidor que hice en POE para que funcione como chat o me mandase una alerta...

No tengo idea sobre estas cosas. La idea es que mi página está en Apache en la web y en mi servidor hice ya el servidor que corre en el puerto 31338...

No sé si me hice entender... No sé qué poner en la página html, si un Ajax o qué hago para que este servidor empiece a enviarme datos.

Desde luego, JavaScript tienes que poner. Puede ser un código que se llame cada poco tiempo (por ejemplo, con setInterval()), o usar el sistema Ajax, para que se conecte y actualice la página de forma asíncrona.

Para ello, puedes usar JQuery... u olvidarte completamente del JavaScript, y usar Perl, con CGI::Ajax aunque, eso no te libra de poner un contador (nuevamente, con setInterval()), para que haga las actualizaciones periódicas.

No es obvio, no...

Otra opción sería usar websockets. Con Mojolicious se puede crear una conexión bidireccional entre cliente y servidor (siempre que el navegador lo soporte, claro).

Me lo suponía... pero, por ejemplo, ¿cómo controlo que si se conectan tres personas para una mensajería...?

Yo soy supervisor y me conecté, y ahora le quiero enviar un mensaje a los otros dos conectados, ¿cómo sería la lógica para que les llegara a los otros?

1. ¿tengo que guardar en una variable esos valores?
2. ¿cómo haría para saber que es un nuevo mensaje y no uno viejo para enviarle?
3. ¿cómo hago para saber si un usuario ya se le envió ese mensaje?

Más o menos me hago ideas, pero no tengo eso claro.

Toda la información debe pasar por un proceso servidor, que guarde la información que se le envía, reenviar la información del emisor a los otros, control del acceso de los usuarios, guardar (o no) temporalmente la información...

Es lo mismo que hacen los servidores de IRC o mensajería instantánea (IM).

Bueno, hay una diferencia entre los dos: el servidor IRC reenvía los mensajes que llegan de los usuarios, a todos, pero solo a los que estén conectados en ese momento. Y el servidor de IM sabe que debe guardar los mensajes en caso de que un remitente no esté conectado, y enviarle el mensaje en cuanto se conecte. Depende de lo que quieras hacer, elegirás un método y otro. O inventarte un procedimiento nuevo.

Para IRC hay unos cuantos servidores en CPAN. Y para IM, hay proyectos interesantes, como por ejemplo AcidIM (aunque no ha pasado de la versión 0.1, así que es muy posible que no esté completo). En Google se encuentran más (busca por perl instant messaging).

Debes llevar un control por cada usuario. Aquí vienen muy bien los arrays: con un shift() sacas el primer mensaje que le tienes que enviar, mientras que con push() almacenas el último que ha llegado.

Ok, gracias, explorer, me parece perfecto.

Pero, la verdad, quiero hacerlo con POE, o será que ya no es usado ni se recomienda o está caduco...

Lo que comprendo es que yo tengo que manejar toda la lógica del negocio... tendré que ver cuál sería la mejor forma changosa...

Todo lo que hemos dicho hasta ahora es teoría, por supuesto.

Es tu decisión crearte un servidor propio, o usar alguno ya hecho. Creo que he visto uno escrito en POE, por cierto.

Sobre la obsolescencia de POE, la última versión es del 20 de agosto de este año.

Quizás se habla más de AnyEvent, o Coro. Precisamente, el próximo día 24 de octubre, en el WorkShop de los perleros portugueses habrá un clase dedicada a estos paquetes.