![]() |
![]()
| ![]() |
![]()
NAMECatalyst::Model::DBIC::Plain - DBIC Model Class SYNOPSIS# lib/MyApp/Model/DBIC.pm package MyApp::Model::DBIC; use base 'Catalyst::Model::DBIC::Plain'; my @conn_info = ( $dsn, $username, $password, \%dbi_attributes ); __PACKAGE__->load_classes; __PACKAGE__->compose_connection(__PACKAGE__, @conn_info); 1; # lib/MyApp/Model/DBIC/User.pm package MyApp::Model::DBIC::User; use base 'DBIx::Class::Core'; __PACKAGE__->table('user'); __PACKAGE__->add_columns(qw/id username password email clearance/); __PACKAGE__->set_primary_key('id'); __PACKAGE__->add_relationship( clearance => 'MyApp::Model::DBIC::Clearance', { 'foreign.id => 'self.clearance' } ); # lib/MyApp/Controller/MyController.pm $c->comp('DBIC')->class('user')->search(...); # or MyApp::Model::DBIC::User->search(...); DESCRIPTIONThis is the "DBIx::Class" model class for Catalyst. Whilst it allows you to use DBIC as your model in Catalyst, it does not make your tables classes Catalyst-specific, so you can still use them in a non-Catalyst context. newCatalystifies DBIx::Class and makes the model model class a component. SEE ALSOCatalyst, DBIx::Class AUTHORDanijel Milicevic, "info@danijel.de" THANK YOUDan Kubb, Matt S. Trout COPYRIGHTThis program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.
|