[Bioperl-l] how to catch exception error

[Damien Mattei]

when doing something like this:

use Bio::DB::GenBank;

$gb = new Bio::DB::GenBank();

# this returns a Seq object :
$seq = $gb->get_Seq_by_acc("AC019220");

i get an exception that stop my program:
------------- EXCEPTION  -------------
MSG: WebDBSeqI Request Error

STACK Bio::DB::WebDBSeqI::_request 
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:523
STACK Bio::DB::WebDBSeqI::get_seq_stream 
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:375
STACK Bio::DB::NCBIHelper::get_Stream_by_acc 
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/NCBIHelper.pm:466
STACK Bio::DB::WebDBSeqI::get_Seq_by_acc 
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:161
STACK main::nxtbac ./gmap.pl:338
STACK toplevel ./gmap.pl:25

--------------------------------------


is there a way in bioperl to catch exception
as it is possible in Java or C++ ?


Damien Mattei
C.N.R.S / U.N.S.A - UMR 6549
mailto:mattei@unice.fr
http://www-iag.unice.fr/