Re: [Rio-pm] Recomendação de modulos para Log
On 05/03/14, 1:48 PM, Solli Honorio wrote: > Se eu não estiver enganado, o Log::Any é uma interface/bind para vários > tipos de Log. Tem o Log::Contextual também. Ab, -- Wallace Reis/wreis wall...@reis.me http://wallace.reis.me ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Recomendação de modulos para Log
Log4perl ainda é a melhor opção. 2014-03-05 22:13 GMT-03:00 breno : > Manoel, > > também recomendo o Log4perl, e para apps Mojolicious vc pode usar o > https://metacpan.org/pod/MojoX::Log::Log4perl =] > > []s > > -b > > 2014-03-05 11:48 GMT-05:00 Solli Honorio : > > Manoel, > > > > Eu utilizo o Log4Perl e gosto dele por ser independente e permitir > expandir > > a saida para quase tudo que existe hj, e se não existir é só fazer um > > plugin. > > > > Não recomendo fazer um sistema de log proprietário . > > > > Se eu não estiver enganado, o Log::Any é uma interface/bind para vários > > tipos de Log. > > > > Solli Honorio > > > > > > > > Em 5 de março de 2014 13:05, Manoel Domingues Junior > > escreveu: > >> > >> Olá pessoal, > >> > >> Estou fazendo uns scripts(na verdade é uma API com Mojolicious::Lite) > aqui > >> e implementei uma função de log usando um conjunto de Net::Syslog com > >> Sys::Syslog para fazer o log do script. > >> > >> https://gist.github.com/mdjunior/9369937 > >> > >> > >> > >> sub log_wrapper { > >> > >> my $log = shift; > >> > >> my $priority = shift; > >> > >> > >> if ( ! defined $priority ) { > >> > >> > >> > >> $priority = 'debug'; > >> > >> } > >> > >> if ( $ENV{APP_LOG} eq 'LOCAL' ) { > >> > >> > >> > >> openlog( $ENV{APP_NAME}, 'ndelay,pid', 'LOG_DAEMON' ); > >> > >> > >> > >> syslog( $priority, $log ); > >> > >> closelog(); > >> } elsif ($ENV{APP_LOG} eq 'NET') { > >> > >> > >> > >> my $log_net = Net::Syslog->new( > >> > >> > >> > >> Name => $ENV{APP_NAME}, > >> > >> > >> > >> Facility => 'local7', > >> > >> Priority => $priority, > >> > >> SyslogPort => $ENV{APP_SYSLOG_PORT}, > >> > >> > >> > >> SyslogHost => $ENV{APP_SYSLOG_HOST}, > >> > >> > >> > >> ); > >> $log_net->send($log); > >> > >> > >> > >> } > >> return; > >> > >> } > >> > >> Pesquisando na internet vi que muita gente comenta sobre o > Log::Log4perl e > >> o Log::Any mas não sei bem qual desses (ou outros) é o ideal ou o > padrão de > >> uso. > >> > >> No caso, toda a configuração do meu script fica em variáveis de > ambiente. > >> O script possui uma trilha de auditoria que é feita usando os logs, > logo ele > >> gera eventos em grande quantidade em diferentes níveis (debug, info e > >> error). > >> > >> Alguma recomendação? > >> > >> Abraços, > >> -- > >> -- > >> Manoel Domingues Junior > >> "Coletar dados é o primeiro passo para a sabedoria, mas compartilhar > dados > >> é o primeiro passo para a comunidade." > >> IBM - Prodigy Linux > >> > >> ___ > >> Rio-pm mailing list > >> Rio-pm@pm.org > >> http://mail.pm.org/mailman/listinfo/rio-pm > > > > > > > > > > -- > > "o animal satisfeito dorme". - Guimarães Rosa > > > > ___ > > Rio-pm mailing list > > Rio-pm@pm.org > > http://mail.pm.org/mailman/listinfo/rio-pm > ___ > Rio-pm mailing list > Rio-pm@pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- André Garcia Carneiro Software Engineer (11)982907780 ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Recomendação de modulos para Log
Manoel, também recomendo o Log4perl, e para apps Mojolicious vc pode usar o https://metacpan.org/pod/MojoX::Log::Log4perl =] []s -b 2014-03-05 11:48 GMT-05:00 Solli Honorio : > Manoel, > > Eu utilizo o Log4Perl e gosto dele por ser independente e permitir expandir > a saida para quase tudo que existe hj, e se não existir é só fazer um > plugin. > > Não recomendo fazer um sistema de log proprietário . > > Se eu não estiver enganado, o Log::Any é uma interface/bind para vários > tipos de Log. > > Solli Honorio > > > > Em 5 de março de 2014 13:05, Manoel Domingues Junior > escreveu: >> >> Olá pessoal, >> >> Estou fazendo uns scripts(na verdade é uma API com Mojolicious::Lite) aqui >> e implementei uma função de log usando um conjunto de Net::Syslog com >> Sys::Syslog para fazer o log do script. >> >> https://gist.github.com/mdjunior/9369937 >> >> >> >> sub log_wrapper { >> >> my $log = shift; >> >> my $priority = shift; >> >> >> if ( ! defined $priority ) { >> >> >> >> $priority = 'debug'; >> >> } >> >> if ( $ENV{APP_LOG} eq 'LOCAL' ) { >> >> >> >> openlog( $ENV{APP_NAME}, 'ndelay,pid', 'LOG_DAEMON' ); >> >> >> >> syslog( $priority, $log ); >> >> closelog(); >> } elsif ($ENV{APP_LOG} eq 'NET') { >> >> >> >> my $log_net = Net::Syslog->new( >> >> >> >> Name => $ENV{APP_NAME}, >> >> >> >> Facility => 'local7', >> >> Priority => $priority, >> >> SyslogPort => $ENV{APP_SYSLOG_PORT}, >> >> >> >> SyslogHost => $ENV{APP_SYSLOG_HOST}, >> >> >> >> ); >> $log_net->send($log); >> >> >> >> } >> return; >> >> } >> >> Pesquisando na internet vi que muita gente comenta sobre o Log::Log4perl e >> o Log::Any mas não sei bem qual desses (ou outros) é o ideal ou o padrão de >> uso. >> >> No caso, toda a configuração do meu script fica em variáveis de ambiente. >> O script possui uma trilha de auditoria que é feita usando os logs, logo ele >> gera eventos em grande quantidade em diferentes níveis (debug, info e >> error). >> >> Alguma recomendação? >> >> Abraços, >> -- >> -- >> Manoel Domingues Junior >> "Coletar dados é o primeiro passo para a sabedoria, mas compartilhar dados >> é o primeiro passo para a comunidade." >> IBM - Prodigy Linux >> >> ___ >> Rio-pm mailing list >> Rio-pm@pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > "o animal satisfeito dorme". - Guimarães Rosa > > ___ > Rio-pm mailing list > Rio-pm@pm.org > http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Recomendação de modulos para Log
Manoel, Eu utilizo o Log4Perl e gosto dele por ser independente e permitir expandir a saida para quase tudo que existe hj, e se não existir é só fazer um plugin. Não recomendo fazer um sistema de log proprietário . Se eu não estiver enganado, o Log::Any é uma interface/bind para vários tipos de Log. Solli Honorio Em 5 de março de 2014 13:05, Manoel Domingues Junior < manoel.domingues.jun...@gmail.com> escreveu: > Olá pessoal, > > Estou fazendo uns scripts(na verdade é uma API com Mojolicious::Lite) aqui > e implementei uma função de log usando um conjunto de Net::Syslog com > Sys::Syslog para fazer o log do script. > > https://gist.github.com/mdjunior/9369937 > > > sub log_wrapper { > > > my $log = shift; > > my $priority = shift; > > > if ( ! defined $priority ) { > > > $priority = 'debug'; > > } > > if ( $ENV{APP_LOG} eq 'LOCAL' ) { > > > openlog( $ENV{APP_NAME}, 'ndelay,pid', 'LOG_DAEMON' ); > > > syslog( $priority, $log ); > > closelog(); > } elsif ($ENV{APP_LOG} eq 'NET') { > > > my $log_net = Net::Syslog->new( > > > Name => $ENV{APP_NAME}, > > > Facility => 'local7', > > Priority => $priority, > > SyslogPort => $ENV{APP_SYSLOG_PORT}, > > > SyslogHost => $ENV{APP_SYSLOG_HOST}, > > > ); > $log_net->send($log); > > > } > return; > > } > > Pesquisando na internet vi que muita gente comenta sobre o Log::Log4perl e > o Log::Any mas não sei bem qual desses (ou outros) é o ideal ou o padrão de > uso. > > No caso, toda a configuração do meu script fica em variáveis de ambiente. > O script possui uma trilha de auditoria que é feita usando os logs, logo > ele gera eventos em grande quantidade em diferentes níveis (debug, info e > error). > > Alguma recomendação? > > Abraços, > -- > -- > Manoel Domingues Junior > "Coletar dados é o primeiro passo para a sabedoria, mas compartilhar dados > é o primeiro passo para a comunidade." > IBM - Prodigy Linux > > ___ > Rio-pm mailing list > Rio-pm@pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- "o animal satisfeito dorme". - Guimarães Rosa ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Recomendação de modulos para Log
http://mojolicio.us/perldoc/Mojo/Log среда, 5 марта 2014 г. пользователь Manoel Domingues Junior написал: > Olá pessoal, > > Estou fazendo uns scripts(na verdade é uma API com Mojolicious::Lite) aqui > e implementei uma função de log usando um conjunto de Net::Syslog com > Sys::Syslog para fazer o log do script. > > https://gist.github.com/mdjunior/9369937 > > sub log_wrapper { > > > my $log = shift; > > my $priority = shift; > > > if ( ! defined $priority ) { > > $priority = 'debug'; > > } > > if ( $ENV{APP_LOG} eq 'LOCAL' ) { > > openlog( $ENV{APP_NAME}, 'ndelay,pid', 'LOG_DAEMON' ); > > syslog( $priority, $log ); > > closelog(); > } elsif ($ENV{APP_LOG} eq 'NET') { > > my $log_net = Net::Syslog->new( > > Name => $ENV{APP_NAME}, > > Facility => 'local7', > > Priority => $priority, > > SyslogPort => $ENV{APP_SYSLOG_PORT}, > > SyslogHost => $ENV{APP_SYSLOG_HOST}, > > ); > $log_net->send($log); > > } > return; > > } > > Pesquisando na internet vi que muita gente comenta sobre o Log::Log4perl e > o Log::Any mas não sei bem qual desses (ou outros) é o ideal ou o padrão de > uso. > > No caso, toda a configuração do meu script fica em variáveis de ambiente. > O script possui uma trilha de auditoria que é feita usando os logs, logo > ele gera eventos em grande quantidade em diferentes níveis (debug, info e > error). > > Alguma recomendação? > > Abraços, > -- > -- > Manoel Domingues Junior > "Coletar dados é o primeiro passo para a sabedoria, mas compartilhar dados > é o primeiro passo para a comunidade." > IBM - Prodigy Linux > ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm