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

[Otávio Fernandes]

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