- or download this
# $HOME/.my.cnf
...
[myapp]
user=specialguy
password=something_different
- or download this
my $dbh = DBI->connect("DBI:mysql:test"
. ";mysql_read_default_file=$ENV{HOME}/.my.cnf"
...
undef,
undef
) or die "something went wrong ($DBI::errstr)";
- or download this
my $profile = shift || 'usage';
...
undef,
undef
) or die "something went wrong ($DBI::errstr)";