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