タグ

DBICに関するsugyanのブックマーク (6)

  • 第38回 DBIx::Class:拡張性の高さが売りではありますが | gihyo.jp


     3DBICDBIx::ClassDBICMooseCatalystPerlClass::DBIDBIC  DBICClass::DBI 36
    第38回 DBIx::Class:拡張性の高さが売りではありますが | gihyo.jp
    sugyan
    sugyan 2010/12/21
    とても面白い
  • 第3回 DBIx::Classでデータベース操作(3) | gihyo.jp

    Resultクラスの拡張 Resultクラス、ResultSetクラスは自分の好みに合わせて拡張できます。 カラムのinflate/deflate $tweet->created_dateのようなつぶやきの日付を取りたい場合、カラムの値そのままではなくDateTimeオブジェクトを返してくれたらうれしいと思います。その機能を実現するのがカラムのinflate/deflate機能です。inflate(膨らませる)は文字どおりカラムのデータをPerlオブジェクトに変換する機能で、deflate(収縮させる)はPerlオブジェクトをカラムデータへ変換する機能です。 Resultクラス内で __PACKAGE__->inflate_column('column_name', { inflate => sub { # カラムデータからオブジェクトを作って返す }, deflate => sub {

    第3回 DBIx::Classでデータベース操作(3) | gihyo.jp
  • 第3回 DBIx::Classでデータベース操作(1) | gihyo.jp


    PerlDBIx::Class DBIx::Class DBIx::ClassPerlO/RO/RObject/Relational MappingORMORM使 DBIx::ClassPerlORM使DBIx::SkinnyData::ModelDBIx::Cl
    第3回 DBIx::Classでデータベース操作(1) | gihyo.jp
  • DBIx::Classで論理削除 - unknownplace.org


    DBIC調  __PACKAGE__->resultset_attributes({ where => { deleted => undef }}); WHERE deleted IS NOT NULL   delete  update({ deleted => 1 })  cascade delete  DBICrowdelete delete ()DBIx::Clas
  • DBIx::Class::Schema::Loaderの手動スキーマ生成、初心者向けチュートリアル - Yet Another Hackadelic

    と言う訳で自分なりに色々調べてみた。 テスト用データベース定義 CREATE TABLE `User` ( `user_id` bigint(20) NOT NULL auto_increment, `name` varchar(255) character set latin1 default NULL, `created_on` datetime default NULL, `updated_on` datetime default NULL, PRIMARY KEY (`user_id`) ) ENGINE=InnoDB DEFAULT CHARSET=utf8; CREATE TABLE `Book` ( `book_id` bigint(20) NOT NULL auto_increment, `name` varchar(255) character set latin1 de

    DBIx::Class::Schema::Loaderの手動スキーマ生成、初心者向けチュートリアル - Yet Another Hackadelic
    sugyan
    sugyan 2010/05/16
  • Catalyst+DBIC+TT+Data::Page::Navigationでページング - はてな#hide-k


    使 CatalystControllerData::Page::Navigationuse MyApp::Controller::User package MyApp::Controller::User use strict; use warnings; use parent 'Catalyst::Controller'; use Data::Page::Navigation; sub index : Path : Args(0) { my ( $self, $c ) = @_; my $page = $c->req->param('page') || 1; my $rows = $c->req->param('rows') || 10; my $users = $c->model('DBIC::Users')->search( {},
    Catalyst+DBIC+TT+Data::Page::Navigationでページング - はてな#hide-k
    sugyan
    sugyan 2010/01/20
    ページング
  • 1