Well, the definition of DBI::connect indicates that the (optional) fourth parameter is a reference to an attributes hash, not a string constant.

If I had to hazard a guess, I'd change your connect to $dbh = DBI->connect( $DB1, 'uid', 'passw' );