ПРОЕКТЫ 


  АРХИВ 


Apache-Talk @lexa.ru 

Inet-Admins @info.east.ru 

Filmscanners @halftone.co.uk 

Security-alerts @yandex-team.ru 

nginx-ru @sysoev.ru 

  СТАТЬИ 


  ПЕРСОНАЛЬНОЕ 


  ПРОГРАММЫ 



ПИШИТЕ
ПИСЬМА














     АРХИВ :: Apache-Talk
Apache-Talk mailing list archive (apache-talk@lists.lexa.ru)

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [apache-talk] =?koi8-r?B?4sXaz9DB087B0SDB19TPx8XOxdLBw8nRIMvPzsbJx8EgxMzRIEFwYWNoZQ==?=




On Thu, 10 Jul 2003, Dmitry Belyavsky wrote:

> Вопрос: как в скрипте (желательно перловом) проверить, что Apache может
> начать слушать на данной паре IP/порт?

А просто попробовать повиснуть на этом сокете не получится?

use IO::Socket;
$sock = new IO::Socket::INET (LocalHost => '127.0.0.1',
                              LocalPort => 80,
                              Proto     => 'tcp',
                              Listen    => 5,
                              Reuse     => 1                             
                             );
die "Socket could not be created. Reason: $!" unless $sock;


(пример взят из O'Reilly-вского "Advanced Perl Programming")
Соответственно, скрипт надо пускать из-под рута.


wbr.,
 Ilya "Scarab" Basalaev, IAB22-RIPE
 SWsoft Inc.,  System Administrator


 




Copyright © Lexa Software, 1996-2009.