Select Code to Download

my $my_cnf = 'path_to_somewhere_safe/my_cnf.cnf';

...
    undef, 
    {RaiseError => 1}
) or  die "DBI::errstr: $DBI::errstr";

# my_cnf.cnf

...
database = my_db
user     = my_usr
password = my_pwd