[SP-pm] Tratamento de erros

[Marcio - Google]

Pessoal,

   Aprendi em um tutorial a algum tempo fazer assim:
eval {
# Códigos que podem dar erro
}
if ($@) {
# Deu pau
}

   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.

   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.

   Como eu faço isso em Perl?

   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.

   Obrigado pela paciência ... :-)

[...]'s

Marcio
-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20130313/efc8b04a/attachment.html>