eval {
                $dbh = DBI->connect('dbi:SQLite2:dbname=test.db','','') or
                  die ("Can't connect!");
        };
        if ($@) {
            info caught;
            warn "Falling back to CSV file..."
            # do stuff.
        }