[SP-pm] Modulo Perl - monitoramento básico

[zechim, lucas]

Otávio,

Eu tenho essa consciência de que GOLF não é para produção.

A ideia era demonstrar que existe outra saída para a monitoração do
load average através do /proc/loadavg, e não do 'top'
E ainda mais que se tem uma coisa que eu não manjo muita coisa é regexp :D
E até por isso meu one liner poderia ser bem menor :)

Lucas Zechim




2010/9/13 Otávio Fernandes <otaviof em gmail.com>:
> 2010/9/13 zechim, lucas <lzechim em gmail.com>:
>> André,
>>
>> Não sei a tua necessidade, mas...
>> http://search.cpan.org/~perlboy/Linux-loadavg-0.09/loadavg.pm
>>
>> Ou ainda...
>>
>> perl -e '($avg1, $avg5, $avg15) = `cat /proc/loadavg` =~ m/^(.{4})
>> (.{4}) (.{4}).*/; print "$avg1 - $avg5 - $avg15\n"'
>>
>>
>> E ai o pessoal com mais experiência em GOLF pode de ajudar à ficar melhor ainda!
>>
>>
>> Lucas Zechim
>
> Lucas,
>
> Para uma aplicação em produção, a última coisa que eu pensaria é escrever
> código desta forma (Perl Golf). Melhor seria usar N * 10 linhas a mais de Perl
> e escrever um código que seja legível, e de preferência coberto por testes.
>
> Perl Golf é ótimo para treinar a sua lógica, usar os internal do Perl e se
> divertir, mas só ;-).
>
> um abraço,
>
> --
> Otávio Fernandes
> otaviof at ( gmail.com, cpan.org )
> http://github.com/otaviof
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>