Auto Ident XML

leoberbert

Identação para XML. Modo de utilização: echo "<?xml version="1.0" encoding="UTF-8"?><from>Teste</from><message>viva o linux</message>" | perl ident_xml.pl <?xml version=1.0 encoding=UTF-8?> <from>Teste</from> <message>viva o linux</message>

Por: Leonardo Berbert Gomes

Monitoração Web com Perl

leoberbert

Este script tem como principal objetivo a criação de um servidor web para exibição de informações de monitorações coletadas do servidor em questão. Para maiores informações de utilização/configuração do script acesse a dica abaixo: http://www.vivaolinux.com.br/dica/Monitoracao-Web-com-Perl/

Por: Leonardo Berbert Gomes

Check All Process

leoberbert

Este script em Perl tem como finalidade realizar a monitoração de todos os processos cadastrados em um arquivo de configuração e a partir dele, será verificado se todos os processos e/ou serviços possuem ao menos 1 processo em execução. Caso seja verdade, será exibida a mensagem de "OK", caso negativo será exibida a mensagem "FAILED". No anexo coloquei a saída do script, note que ele é muito interativo para monitoração. Espero que ajude a todos. []'s leoberbert

Por: Leonardo Berbert Gomes

Monitor Process

leoberbert

Este script tem como finalidade monitorar processos e caso este não esteja em execução ele realizará o start do mesmo e também irá registrar num arquivo de Log. Neste script usei o apache como referência, porém, poderão ser monitorados quais e quantos processos forem necessários. Espero que possa ajudar a todos.

Por: Leonardo Berbert Gomes

Mega Sena

leoberbert

Simples script que sorteia 6 números de forma aleatória para a mega sena. Obs: Este script não faz nenhum jogo preciso, pois é aleatório.

Por: Leonardo Berbert Gomes