🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

CGI en perl.

#15522
From: Pedro Burgos
Date: Fri, 23 Jun 2000 00:00
19 lines
1071 bytes
Hola a todos.

Necesito chequear un apache desde un CGI en perl. Ademas de comprobar
que el puerto del apache est� activo, necesito comprobar que el apache
esta corriendo correctamente, �c�mo puedo hacerlo? He probado con los
sockets pero no terminan de funcionar bien... :-?

$sock = IO::Socket::INET->new(Listen    => 5,
                              LocalAddr => 'localhost',
                              LocalPort => 9000,
                              Proto     => 'tcp');
$sock->send('HEAD / HTTP/1.0\n\n');

Gracias :-)

-- 
Un Saludo,
Pedro Burgos
pedrob@poboxes.com
Technical Details
Message-ID: <39537D62.A4FE882F@poboxes.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: f86c8,7ff9a87a1c5fb910,start
X-Google-Attributes: gidf86c8,public
From: Pedro Burgos <pedrob@poboxes.com>
Subject: CGI en perl.
Date: 2000/06/23
Message-ID: <39537D62.A4FE882F@poboxes.com>
X-Deja-AN: 638085476
Content-Transfer-Encoding: 8bit
Organization: Iddeo - Retevisi�n
X-Accept-Language: en
Content-Type: text/plain; charset=iso-8859-1
Mime-Version: 1.0
Newsgroups: es.comp.os.linux.programacion