Nesta dica abordo como criar uma monitoração via interface Web utilizando a linguagem de programação Perl sem ter a necessidade de um servidor Apache, Nginx etc.

Para esta dica será necessário a instalação dos módulos Perl abaixo:

• Socket
• IO::Socket
• Time::localtime
• LWP::Simple

Esta dica surgiu com o intuito de criar uma interface web para que uma área sem acesso ao sistema operacional pudesse acompanhar se alguns processos estavam em execução ou não.

O script poderá ser baixado no link abaixo:

• Monitoração Web com Perl [Script]

Após abrir o script, poderá ser visto o bloco do código abaixo que mostra de onde ele faz a leitura dos dados para exibição:


Nome do arquivo que ele irá ler para a exibição:


Porta em que o webservice está executando:


Obs.: É imprescindível que a porta utilizada na variável acima esteja incluída em suas regras de firewall para que possa ser acessada pela vlan em questão.

O conteúdo do script do arquivo process.cfg está no seguinte formato:


Com todos os requisitos acima sendo atendidos, é hora de executar o script e avaliar o resultado.

Para executá-lo, utilize o comando:

perl web.pl

Em seguida, abra seu browser e acesse o endereço:

• http://IP_DO_SERVIDOR:5030

Pronto, será exibida a tela abaixo: Devido a falta de tempo não realizei a customização do HTML com cores.

É possível editar no código do script para que quando uma determinada ocorrência, por exemplo "Not_Running", ele coloque a célula em vermelho e quando encontra "Running", alterar a cor para verde.