Você pode usar um sigleton pra abrir o log na primeira vez, e depois ir
appendando no arquivo e chamar de qualquer lugar da app. Pode ser dentro de
role, nao importa.
package LogCSV;
use MooseX::Singleton;
sub loga_ca_bagaca {}
-----
Qualquer lugar depois:
my $log = LogCSV->instance;
...
$log->loga_ca_bagaca;
2013/7/18 Junior Moraes <[email protected]>
> Hi.
>
> Em 18 de julho de 2013 10:16, Renato Santos <[email protected]>escreveu:
>
> vai ter tanta exception assim?!
>>
>> -- anyway
>>
>> global variable ? Log4perl ?
>>
>
> Vai sim. =(
>
> Não testei variáveis globais, pensei que também seria "resetada" assim
> como os attrs.
> O Log4perl escreve CSV? Desconhecia! Vou dar uma caçada!
>
> Valeuz, Cron!
>
> []'s
>
> --
> ====================================
> Junior "fvox" Moraes
> Perl Programmer
> Linux Reg. #557527
> junior[at]fvox[dot]com[dot]br
> fb[dot]com/fvox
> twitter[dot]com/fvox
> ====================================
>
> =begin disclaimer
> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> SaoPaulo-pm mailing list: [email protected]
> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
>
--
Saravá,
Renato CRON
http://www.renatocron.com/blog/
@renato_cron <http://twitter.com/#!/renato_cron>
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
