DataSource::Driver(3pm) | User Contributed Perl Documentation | DataSource::Driver(3pm) |
NAME¶
DBIx::DataSource::Driver - Driver Writer's Guide and base classSYNOPSIS¶
perldoc DBIx::DataSource::Driver; or package DBIx::DataSource::FooBase; use DBIx::DataSource::Driver; @ISA = qw( DBIx::DataSource::Driver );
DESCRIPTION¶
To implement a driver for your database:1) If you can create a database with an SQL command through DBI/DBD, simply provide a parse_dsn class method which returns a list consisting of the *actual* data source to use in DBI->connect and the SQL.
package DBIx::DataSource::NewDatabase; use DBIx::DataSource::Driver; @ISA = qw( DBIx::DataSource::Driver ); sub parse_dsn { my( $class, $action, $dsn ) = @_; # $action is `create' or `drop' # for example, if you parse parse $dsn for $database, # $sql = "$action $database"; # you can die on errors - it'll be caught ( $new_dsn, $sql ); }
2) Otherwise, you'll need to write create_database and drop_database class methods.
package DBIx::DataSource::NewDatabase; sub create_database { my( $class, $dsn, $user, $pass ) = @_; # for success, return true # for failure, die (it'll be caught) } sub drop_database { my( $class, $dsn, $user, $pass ) = @_; # for success, return true # for failure, die (it'll be caught) }
AUTHOR¶
Ivan Kohler <ivan-dbix-datasource@420.am>COPYRIGHT¶
Copyright (c) 2000 Ivan Kohler Copyright (c) 2000 Mail Abuse Prevention System LLC All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.BUGS¶
SEE ALSO¶
DBIx::DataSource, DBIx::DataSource::mysql, DBIx::DataSource::Pg, DBI2018-02-11 | perl v5.26.1 |