Script para fazer buscas no arquivo de logs do squid
Publicado por Moises (última atualização em 09/07/2012)
[ Hits: 4.572 ]
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
Burlando o "Protetor de links" INVERTIDO para download grátis
Avisar por e-mail se o IP da conexão ADSL mudar
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Git config não aplica configurações
O que você quer para sua vida ao usar o Linux?
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Já estou acreditando que não há limites... (5)
Teclado n~ao escreve abnt2 (9)
Linux mint só reproduz vídeos em navegadores se estiverem mutados [RES... (2)