Help for this page
#!/usr/bin/perl -w use strict; ... "$db_password") or die "Couldn't connect to database: ".DBI->er +rstr;
/path/to/user/mysql/bin/mysql -u first -p