(This ought to be in Seekers of Perl Wisdom).

The problem is that you're not checking for errors. The connect is probably failing because the webserver doesn't have permission to access your database. Give it a username/password to use and check for errors!