<DIV>
<DIV>Nilson,</DIV>
<DIV> </DIV>
<DIV>Muito interessante, eu estou fazendo algumas coisa com Perl e .NET e estava sentido muita faulta de algo parecido com o Expection do .NET.</DIV>
<DIV> </DIV>
<DIV>Vou começar a alterar os meus script para utilizar este módulo, ao invéz dos famosos 'return error_cod' e aí trocamos algumas idéias.</DIV>
<DIV> </DIV>
<DIV>Até mais,</DIV>
<DIV> </DIV>
<DIV>Solli M. Honorio</DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>De:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>cascavel-pm-bounces@pm.org</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Para:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>"Cascavel Perl Mongers" cascavel-pm@pm.org</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Cópia:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2></FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Data:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>Mon, 28 Feb 2005 16:25:03 -0300</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Assunto:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>[Cascavel-pm] Pedido de sugestões/críticas</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD width=100 bgColor=#e8e8e8> </TD>
<TD width=400 bgColor=#e8e8e8> </TD></TR></TBODY></TABLE></DIV>
<DIV>> Olá,</DIV>
<DIV>> </DIV>
<DIV>> Nesse fim de semana, após tentar 2 outros nomes que não haviam sido</DIV>
<DIV>> aprovados para constar na module-list oficial, finalmente coloquei</DIV>
<DIV>> mais um módulo meu na CPAN.</DIV>
<DIV>> </DIV>
<DIV>> Quem é familiar com tratamento de exceções em Perl utilizando uma</DIV>
<DIV>> filosofia OO, com classes de exceções, etc, certamente já ouviu falar</DIV>
<DIV>> no módulo "Error". Contudo, quem costuma ler bastante o PerlMonks,</DIV>
<DIV>> talvez já tenha ouvido falar dos problemas relacionados a esse módulo</DIV>
<DIV>> que vão desde pequenas nuancias (como não poder retornar de dentro de</DIV>
<DIV>> um bloco) até memory leaks.</DIV>
<DIV>> </DIV>
<DIV>> Apesar disso tudo, eu ainda acho a interface do módulo Error a melhor</DIV>
<DIV>> existente, em comparação com os outros módulos de tratamento de</DIV>
<DIV>> exceções. Assim sendo, resolvi fazer uma implementação da mesma</DIV>
<DIV>> interface, porém usando source filter. Com isso, os problemas</DIV>
<DIV>> relativos ao uso do módulo Error são eliminados, mas sua interface bem</DIV>
<DIV>> conveniente permanece. Além disso, como após a filtragem o código se</DIV>
<DIV>> torna "nativo" (só baseado em eval{} if ($@)) ele se torna um pouco</DIV>
<DIV>> mais rápido.</DIV>
<DIV>> </DIV>
<DIV>> No mais, além de talvez ser útil para outras pessoas, foi um</DIV>
<DIV>> exercício para mim sobre como utilizar o módulo Parse::RecDescent.</DIV>
<DIV>> </DIV>
<DIV>> Bom, basta de conversa. O módulo está na CPAN, seu nome aprovado foi:</DIV>
<DIV>> Error::TryCatch (bem sugestivo).</DIV>
<DIV>> http://search.cpan.org/~nilsonsfj/Error-TryCatch-0.03/</DIV>
<DIV>> </DIV>
<DIV>> Gostaria que, se possível, me fizessem sugestões/comentários/críticas</DIV>
<DIV>> e possíveis bug reports, caso cheguem a utilizá-lo.</DIV>
<DIV>> </DIV>
<DIV>> -Nilson Santos F. Jr.</DIV>
<DIV>> _______________________________________________</DIV>
<DIV>> Cascavel-pm mailing list</DIV>
<DIV>> Cascavel-pm@pm.org</DIV>
<DIV>> http://mail.pm.org/mailman/listinfo/cascavel-pm</DIV></DIV>