[SP-pm] Capturar trechos de um arquivo de log

[Thiago]

Não sei o tamanho do arquivo, mas uma máquina de estados, como sugeriu o 
Blabos soa bem...

On 13-03-2011 01:13, "Flávio R. Lopes" wrote:
> Olá pessoal, tudo bem?
> Seguinte, tenho rodando uma aplicação que gera um arquivo de log no 
> seguinte formato (e que seguem um padrão):
>
> 12-Mar 22:56 Id 100: Starting......
> 12-Mar 22:56 Id 100: blablablablablablablablablabla
> 12-Mar 22:56 Id 100: blablablablabla
> .
> .
> .
> Id:              100
> .
> .
> .
> Status:              OK
> .
> .
> .
> 12-Mar 22:57 Id 100: blablablablablablabla
> 12-Mar 22:57 Id 100: blablablablablablablablablablablablabla
> 12-Mar 22:57 Id 100: End
>
> 13-Mar 22:10 Id 101: Starting......
> 13-Mar 22:10 Id 101: blablablablablablablablablabla
> 13-Mar 22:10 Id 101: blablablablablablablablablablablablabla
> .
> .
> .
> Id:              101
> .
> .
> .
> Status:              ERROR
> .
> .
> .
> 13-Mar 22:11 Id 101: blablablablablablabla
> 13-Mar 22:11 Id 101: blablablablablablablablablablablablabla
> 13-Mar 22:11 Id 101: End
>
>
> Minha idéia é gravar num arquivo, os blocos (trechos) que tiveram 
> album problema (FAIL, WARNING, ERROR) e posteriormente enviar no meu 
> e-mail.
> Tomando o exemplo acima, nas linhas referentes a tarefa (ID=101) 
> executada em 13/03, aconteceu algum problema (Status=ERROR). Então 
> gostaria de copiar o bloco compreendido deste o início da linha onde é 
> "startada" a tarefa (13-Mar 22:10 Id 101: Starting......) até a última 
> linha desta tarefa (13-Mar 22:11 Id 101: End)
>
> Tentei buscar algum módulo no CPAN, mas acredito que não estou fazendo 
> a busca de forma apropriada.
> Alguém pode me dar uma sugestão?
>
> Abraço,
> Flávio
>
> =begin disclaimer
>   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer