- バックアップ一覧
- 差分 を表示
- 現在との差分 を表示
- ソース を表示
- Perl-DBIC/環境設定/スキーマクラス・テーブルクラスの作成 へ行く。
Schemaクラス作成
Schemaクラスファイルの自動生成
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を継承して
全テーブル分の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";
}
参考
http://search.cpan.org/~blblack/DBIx-Class-Schema-Loader-0.04002/lib/DBIx/Class/Schema/Loader.pm
