![]() |
![]()
| ![]() |
![]()
NAMEData::Model::Driver::DBI - storage driver for DBI SYNOPSISpackage 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 { .... }; DESCRIPTIONDBD that is working now is only mysql and SQLite. SEE ALSODBI, Data::Model AUTHORKazuhiro Osawa <yappo <at> shibuya <döt> pl> LICENSEThis library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. POD ERRORSHey! The above document had some coding errors, which are explained below:
|