🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #2075

¿Se puede cargar el intérprete de Perl como un servidor?

#2075
From: Alberto Cabello Sanchez
Date: Wed, 04 May 2005 17:58
18 lines
1748 bytes
Mil perdones, se me hab�a olvidado que ten�a este hilo a medias. Por si 
todav�a le interesa a alguien, este minic�digo Perl

#!/usr/bin/perl
use POSIX;
# Otros use

$pid = fork;
exit if $pid;
POSIX::setsid();
while () {
         sleep 1;
         system("date >> /tmp/p");
}

crea un demonio que va escribiendo la fecha en el fichero /tmp/p, pero 
creo que es obvio c�mo modificarlo para que haga algo �til. La carga de 
m�dulos se hace al principio, de una vez por todas.
Technical Details
Message-ID: <d5b2fh$ksq$1@appleseed.escomposlinux.org>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!border1.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!peer01.cox.net!cox.net!antonio.escomposlinux.org!cernicalo.escomposlinux.org!appleseed.escomposlinux.org!escomposlinux.org!appleseed.escomposlinux.org!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: f86c8,7f3fdcfd7cd0809e,start
X-Google-Attributes: gidf86c8,public
X-Google-Language: SPANISH,ASCII
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!border1.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!peer01.cox.net!cox.net!antonio.escomposlinux.org!cernicalo.escomposlinux.org!appleseed.escomposlinux.org!escomposlinux.org!appleseed.escomposlinux.org!not-for-mail
From: Alberto Cabello Sanchez <lagallina@unex.es>
Newsgroups: es.comp.os.linux.programacion
Subject: ¿Se puede cargar el intérprete de Perl como un servidor?
Date: Wed, 04 May 2005 19:58:02 +0200
Organization: Servidor Appleseed de Ecolnet
Lines: 18
Message-ID: <d5b2fh$ksq$1@appleseed.escomposlinux.org>
NNTP-Posting-Host: marmota.unex.es
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 8bit
X-Trace: appleseed.escomposlinux.org 1115229490 21402 158.49.4.202 (4 May 2005 17:58:10 GMT)
X-Complaints-To: news@appleseed.escomposlinux.org
NNTP-Posting-Date: Wed, 4 May 2005 17:58:10 +0000 (UTC)
User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.7.6) Gecko/20050323
X-Accept-Language: es-es, en-us, en