
YAML::DBH

use YAML::DBH 'yaml_dbh'; my $dbh = yaml_dbh( '/home/myself/mysql_credentials.conf' );
my $conf = YAML::LoadFile('./file.conf');
my $dbh = YAML::DBH::yml_dbh($conf);
my $dbh = YAML::DBH::yml_dbh({
username => 'james', password => 'awefafw', database => 'oof',
});
my $dbh = YAML::DBH::yml_dbh({
abs_db => './t/sqlite.db',
});

Point and shoot method of getting a database handle with only a yaml configuration file as argument.
This is meant for people learning perl who just want to get up and running. It's the simplest customizable way of getting a database handle with very little code.
This is mostly for mysql- the default driver used. The conf file may also tell to use a sqlite db instead.

Are not exported by default.
Argument is abs path to yaml config file. Returns database handle, this is a DBI connect object.
Optionally you may pass it a conf hashref as returned by YAML::LoadFile instead, to scan it for the parameters to open a mysql connect with, and return a database handle.

You basically need a text file with various parameters. We need the hostname, the username, the password, and the name of your database to connect to. We allow the names of the parameters to be all kinds of silly things like 'user', 'username', 'uname','dbuser', 'DbUsEr' .. Case insensitive. If your config file lacks hostname, we use 'localhost' by default. You can also specify 'driver', by default it is 'mysql'
In /etc/my.conf
--- username: loomis host: localhost driver: mysql database: stuff password: stuffsee
Also acceptable:
--- DBUSER: loomis DBHOST: tetranomicon DBNAME: margaux DBPASS: jimmy
Also acceptable:
--- user; james pass: kumquat dbname: stuff
Also acceptable:
--- username: jack password: aweg3hmva database: akira
Also acceptable to open a sqlite db:
--- abs_sqlite: /path/to/sqlite.db
Or:
-- abs_db: /path/to/sqlite.db

Tests will fail unless you have mysqld running, see README.

YAML DBI DBD::mysql DBD::SQLite

Leo Charre leocharre at cpan dot org