[Cascavel-pm] Ajuda com tail

Giuliani Deon Sanches giulianisanches em gmail.com
Terça Julho 7 13:35:32 PDT 2009


2009/7/7 Lindolfo "Lorn" Rodrigues <lorn.br em gmail.com>
>
> Cara, use esse modulo do CPAN você terá mais controle:
>
> http://search.cpan.org/~mgrabnar/File-Tail-0.99.3/Tail.pm
>
> Qualquer dúvida manda ai
>
> 2009/7/7 Ari Arantes <ariarantes em gmail.com>
>>
>> Pessoal,
>>
>> Preciso escrever uma rotina para monitorar os acessos ao POP3. Fiz o seguinte:
>>
>> #!/usr/bin/perl
>>
>> #um exemplo do LOG:
>> #Jul  7 16:46:24 servidor1 pop3d: LOGIN,
>> user=usuario1 em dominio1.com.br, ip=[201.201.201.43], port=[4682]
>>
>>
>> $arqlog="/var/log/maillog";
>>
>> open(LOG, "tail -F $arqlog | grep \"pop3d: LOGIN,\" |");
>> while ($log=<LOG>) {
>>        chomp($log);
>>        ($lixo, $ip, $lixo) = split('ip=\[', $log);
>>        ($ip, $lixo) = split('\]', $ip);
>>        print "$ip $log\n";
>> }
>>
>> Esse é apenas o começo, depois terá conexão com base de dados, mas
>> tenho uma dúvida.
>>
>> Se digito "tail -F /var/log/maillog | grep "pop3d: LOGIN,"" numa
>> sessão ssh, a tela rola muito rápido e de forma constante, agora se
>> rodo pelo perl acima, parece que ele "enche" um buffer e depois manda
>> de uma vez para tela, como se mandasse de tempos em tempos. Como
>> evitar esse "problema de buffer"?
>>
>> Obrigado,
>>
>> Ari
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
>
> --
> --Lindolfo "Lorn" Rodrigues
> www.slackwarezine.com.br
> http://lornlab.org
> http://sao-paulo.pm.org
> use Catalyst;
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

Cacilda... tava colando link aqui e aparece a resposta do Lor. Se
passa o dia inteiro com o cliente de e-mail aberto ? :P

--
twitter.com/giulianisanches
giulianisanches.blogspot.com


Mais detalhes sobre a lista de discussão Cascavel-pm