[Cascavel-pm] Ajuda com tail

Lindolfo "Lorn" Rodrigues lorn.br em gmail.com
Terça Julho 7 13:32:08 PDT 2009


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;
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090707/6beddcbc/attachment.html>


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