It will help your debugging effort in the long run if you make your DBI error messages a bit more informative, by including things like the SQL being executed and any parameters being used, e.g.
$sth->execute($street) or die "STMT= execute;SQL= $sql;\$street= $stre
+et;ERROR= " . $dbh->errstr;