* Schemaクラス作成 [#r5d1f8a7]
** Schemaクラスファイルの自動生成 [#w1fb1e6b]
MySQLのmydbデータベースに接続して、libディレクトリ以下にMyDB::Schemaという名前空間でSchemaクラスを作成してくれる。
perl -MDBIx::Class::Schema::Loader=make_schema_at,dump_to_dir:./lib \
-e 'make_schema_at "MyDB::Schema", {relationships => 1, debug => 1}, ["dbi:mysql:mydb","db_user","db_passwd"]'
** DBIx::Class::Schema::Loaderを継承して [#gcef247b]
全テーブル分のSchemaクラス。
package MyDB;
use base qw/DBIx::Class::Schema::Loader/;
__PACKAGE__->loader_options();
1;
そのShecmaクラスを利用するスクリプト。
use MyDB;
my $db = DB->connect('dbi:Pg:dbname=mydb','dbuser','dbpasswd');
my $rs = $db->resultset('Users');
my @rows = $rs->search;
foreach (@rows) {
print $_->id,$_->name,"\n";
}
** 参考 [#ef5957c4]
http://search.cpan.org/~blblack/DBIx-Class-Schema-Loader-0.04002/lib/DBIx/Class/Schema/Loader.pm