Data::Model::Driver::DBI - storage driver for DBI
package MyDB;
use base 'Data::Model';
use Data::Model::Schema;
use Data::Model::Driver::DBI;
my $dbi_connect_options = {};
my $driver = Data::Model::Driver::DBI->new(
dsn => 'dbi:mysql:host=localhost:database=test',
username => 'user',
password => 'password',
connect_options => $dbi_connect_options,
reuse_dbh => 1, # sharing dbh (experimental option)
# When you use by MySQL, please set up
# connect_options => { mysql_auto_reconnect => 1 },
# simultaneously. but mysql_auto_reconnect is very unsettled.
);
base_driver $driver;
install_model model_name => schema {
....
};
DBD that is working now is only mysql and SQLite.
Kazuhiro Osawa <yappo <at> shibuya <doet> pl>
This library is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.
Hey! The above document had some coding errors, which are explained
below:
- Around line 568:
- Non-ASCII character seen before =encoding in '<doet>'. Assuming
UTF-8