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
Cpan tiny::try
Vai resolver :-)
Em 13/03/2013 14:08, Marcio - Google marci...@gmail.com escreveu:
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
Hi.
No caso do DBI, creio que o atributo RaiseError deva resolver esses dies
automáticos.
Ref: http://docstore.mik.ua/orelly/linux/dbi/ch04_05.htm
[]'s
Em 13 de março de 2013 14:10, Tiago Peczenyj tiago.pecze...@gmail.comescreveu:
Cpan tiny::try
Vai resolver :-)
Em 13/03/2013 14:08,
Tiago, alguma solução sem a necessidade de instalar módulos?
[...]'s
Marcio
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
Lhttp://mail.pm.org/mailman/listinfo/saopaulo-pm
=end disclaimer
Junior, obrigado. Usei o DBI como exemplo que me veio na hora, pois tinha
acabado de ter problema com ele, mais queria algo que tratasse qualquer
tipo de erro dentro daquele bloco.
[...]'s
Marcio
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list:
Marcio == Marcio - Google marci...@gmail.com writes:
Marcio Só que alguns erros, principalmente relacionados a bando
Marcio de dados (DBI), mesmo ocorrendo no código dentro do eval
Marcio abortam o programa. Tipo, tento inserir com chave
Marcio duplicada, o erro aborta o
Pastebin :)
Em 13 de março de 2013 14:50, Eden Cardim e...@insoli.de escreveu:
Marcio == Marcio - Google marci...@gmail.com writes:
Marcio Só que alguns erros, principalmente relacionados a bando
Marcio de dados (DBI), mesmo ocorrendo no código dentro do eval
Marcio abortam o
Marcio == Marcio - Google marci...@gmail.com writes:
Marcio Tiago, alguma solução sem a necessidade de instalar
Marcio módulos?
Não é necessário instalar módulo algum, eval/if($@) funciona
perfeitamente, inclusive, você pode lançar qualquer valor como
argumento pro die(), inclusive
www.stocksistemas.com.br
- Original Message -
From: Marcio - Google
To: saopaulo...@mail.pm.org
Sent: Wednesday, March 13, 2013 2:08 PM
Subject: [SP-pm] Tratamento de erros
Pessoal,
Aprendi em um tutorial a algum tempo fazer assim:
eval {
# Códigos que podem dar erro
use strict;
use warnings;
use DBI;
use Asterisk::AMI;
use POSIX qw/strftime/;
$|=1;
print Iniciando...\n;
print [ . strftime('%d-%m-%Y %H:%M:%S', localtime) . ] PID: $$\n;
...
eval {
our $connDB = DBI-connect('DBI:mysql:ast_tm;host=bd07.internal.dc',
'***', '') ||
Marcio == Marcio - Google marci...@gmail.com writes:
Marcio use strict; use warnings; use DBI; use Asterisk::AMI; use
Marcio POSIX qw/strftime/;
...
Márcio, põe o seu código num pastebin, de preferência, identado, por
favor.
--
Eden Cardim -- Insolide Soluções de TI Ltda.
+55 11
perltidy++
Em 13 de março de 2013 15:36, Eden Cardim e...@insoli.de escreveu:
Marcio == Marcio - Google marci...@gmail.com writes:
Marcio use strict; use warnings; use DBI; use Asterisk::AMI; use
Marcio POSIX qw/strftime/;
...
Márcio, põe o seu código num pastebin, de
Eu sugeri o tiny::try pq ele oferecer a abstração de try/catch/finally
mas este artigo é interessante:
http://www.effectiveperlprogramming.com/blog/1401
2013/3/13 Eden Cardim e...@insoli.de:
Marcio == Marcio - Google marci...@gmail.com writes:
Marcio Tiago, alguma solução sem a
Não tinha entendido ... sorry ... :D
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
Lhttp://mail.pm.org/mailman/listinfo/saopaulo-pm
=end disclaimer
14 matches
Mail list logo