Pessoal,<div><br></div><div>   Aprendi em um tutorial a algum tempo fazer assim:</div><div>eval {</div><div># Códigos que podem dar erro</div><div>}</div><div>if ($@) {</div><div># Deu pau</div><div>}</div><div><br></div><div>
   Só que alguns erros, principalmente relacionados a bando de dados (DBI), mesmo ocorrendo no código dentro do eval abortam o programa. Tipo, tento inserir com chave duplicada, o erro aborta o programa.</div><div><br></div>
<div>   Eu precisava de algo como try/except/finally, onde não importa qual erro ocorre dentro do try, não aborta o programa e cai no except onde consigo saber qual erro e trata-lo de forma especifica ou genérica, e se não deu erro executa o código que está em finally.</div>
<div><br></div><div>   Como eu faço isso em Perl?</div><div><br></div><div>   Eu sei que são dúvidas bem elementares e alguns podem achar que eu to com preguiça de procurar na net. Não é isso, sempre procuro antes de perguntar. Mais como outro membro disse, em Perl há várias formas de fazer a mesma coisa. Então quando não acho, ou não entendo, ou acho várias formas, pergunto para tentar aprender a forma mais "elegante" e correta de fazer.</div>
<div><div><br></div><div>   Obrigado pela paciência ... :-)</div><br>[...]'s<br><br>Marcio
</div>