Select Code to Download

my $dbh = DBI->connect("dbi:SQLite:dbname=request_db","","", {RaiseErr
+or => 1});

my $dbh;
eval {
...
   # the error will be in the $@ variable
   # the error raised could be from the connect or the do methods
}