Script para fazer buscas no arquivo de logs do squid
Publicado por Moises (última atualização em 09/07/2012)
[ Hits: 4.500 ]
Veja como é simples programar um script em perl que facilita a manipulação do arquivo de log do squid.
Você poderá utilizar este script, digitando uma palavra chave ou digitando alguma expressão regular do perl.
#Script criado por Moises Rodrigues #E-mail brseek@gmail.com #!/usr/bin/perl use strict; use warnings; while (){ print "Digite uma palavra chave ou uma expressão regular\n"; my $search = <>; chomp($search); open(ABRIR, "/var/log/lusca/access.log" || die erro); my @linhas = grep(/$search/,<ABRIR>); my $count=0; print "Digite a quantidade de resultados e exibir\n"; my $results = <>; chomp ($results); foreach (@linhas){ if($count <= $results){ print "Linha $count: $_\n"; $count++; } } close(ABRIR); }
Baixar o Diário Oficial da União e salvar como um único PDF completo
Descobrir operadora de celular
Tweetin - Poste tweets pelo terminal
API do Bing para traduzir textos
Nenhum comentário foi encontrado.
tux-gpt - Assistente de IA para o Terminal
Instalação e configuração do Chrony
Programa IRPF - Guia de Instalação e Resolução de alguns Problemas
Como instalar no Linux Jogos da Steam só para Windows
Instalando o Team Viewer no Debian Trixie - problema no Policykit
O Que Fazer Após Instalar Ubuntu 25.04
Os empreguim de meu Deus estão cada vez mais tecnológicos (0)
Alguém poderia me ajudar a escolher peças pra montar um desktop? (28)
Meu PC perde o boot de várias distros Linux após ficar desligado (4)