use DBI;

Hello to all!

I'm new with perl.
I'm trying a connection with DBI and a MySQL server. Until here all ok, it works.
This little script is executed a lot of times. I've two DB servers and so I would like to implement a simply check:
if the connection to the first server is refused, then connect to the second server.
Is this possible?

Thank's

Simon