Whomever the programmer is needs to do diagnosis on any error messages produced by the program or in the logs, followed by determining if the current db settings have changed. Saying "help, I cannot connect to my db anymore <code snippet>" is not how you diagnose problems or have anyone be able to help you, perl or not.