PERL-387 added retry logic to Database::database_names()

PERL-387