Servicios de Log

ción como root - para abrir sockets en puertos privilegiados o ficheros de PID y log en localizaciones como /var/run/ - para renunciar a los privilegios de root tan pronto como sea posible. Por ahora simplemente creamos el fichero de PID en un lugar al que tengamos acceso.

Ejecución

Ejecución: Servidor

casiano@beowulf:~/src/perl/NETWORKING$ ./eliza_daemon.pl
./eliza_daemon.pl starting...
casiano@beowulf:~/src/perl/NETWORKING$ pgrep -l eliza
25561 eliza_daemon.pl
casiano@beowulf:~/src/perl/NETWORKING$ ./eliza_daemon.pl
Server already running with PID 25561 at ./eliza_daemon.pl line 72, <GEN0> line 1.

Ejecución: Cliente

casiano@micasa:~/LPOP$ telnet beowulf 1026
Trying 123.123.123.123...
Connected to beowulf.
Escape character is '^]'.
Eliza:  Please tell me what's been bothering you.
you:    wau!
Eliza:  That is interesting. Please continue.
you:    uff!
Eliza:  I'm not sure I understand you fully.
you:    For sure you don't understand me
Eliza:  Do you wish to believe I don't understand you?
you:    No
Eliza:  Are you saying no just to be negative?
you:    yes
Eliza:  Please tell me some more about this.
you:    quit
Eliza:  Goodbye.  I hope you found this session helpful.
Connection closed by foreign host.

Ejercicio 14.1.1  

1. Prueba a cerrar la shell después de arrancado el demonio ¿Sigue vivo el daemon?
2. Prueba a eliminar la terminal después de arrancado el demonio ¿Sigue vivo el daemon?
3. ¿A donde va a parar el mensaje de error de la línea 34?

ón
2011-02-21 --> HTML> BORDER="0" SRC="modernperllogo.png" ALT="Modern Perl">
Sig: Poniendo El Proceso en Sup: Demonios y Daemons Ant: Demonios y Daemons HREF="http://perldoc.perl.org/">
Sig: Práctica: Escritura de un Sup: Sockets y Servidores Ant: Un Cliente HTTP