- バックアップ一覧
- 差分 を表示
- 現在との差分 を表示
- ソース を表示
- Perl-DBIC/INSERT-DELETE-UPDATE へ行く。
- 1 (2007-09-05 (水) 10:53:00)
- 2 (2007-09-05 (水) 10:53:13)
- 3 (2008-05-26 (月) 03:42:45)
- 4 (2008-11-04 (火) 01:20:17)
- 5 (2009-07-12 (日) 08:31:07)
- 6 (2009-12-04 (金) 05:06:13)
- 7 (2009-12-16 (水) 05:27:36)
- 8 (2010-05-17 (月) 05:58:16)
- 9 (2011-01-27 (木) 12:45:00)
- 10 (2011-04-18 (月) 18:05:12)
- 11 (2011-06-03 (金) 16:02:27)
INSERT / DELETE / UPDATE
INSERT
$rs->create({ name => "taro", email => "taro@example.com" });
シリアル型のキーを取得(last_insert_id())
$user = $rs->create( { name => "taro" } ); $id = $user->id;
UPDATE
$rs->email('taro@example.com'); $rs->update;
または
$rs->update( { email => 'taro@example.com' } );
まとめてUPDATE
$rs->search( { name => 'taro' } )->update_all( { email => 'taro@example.com' } );
http://search.cpan.org/perldoc?DBIx::Class::ResultSet#create
DELETE
まとめてDELETE
$rs->search( { name =>'taro' } )->delete_all;
既存のレコードがあればそのrowオブジェクト、なければ新規のrowオブジェクトを返す
find_or_new()
$user = $rs->find_or_new({ id => 10 },{ key => 'primary' }); $user->name('taro'); $user->update; # または $user->insert
- idが10のレコードが存在すればそのrowオブジェクトが、なければ新規のrowオブジェクト(idは10)が作られる。
- idがシリアル型(AUTO_INCREMENT)の場合、id => undef とすると、シリアル型に沿ったidのrowオブジェクトが作られる。
- レコードを修正する際は、既存のrowオブジェクトの場合はupdate()、新規のrowオブジェクトの場合はinsert()する。
- keyはprimary key以外のカラムを指定出来るが、カラムはユニーク制約を持つ必要がある。
- http://search.cpan.org/perldoc?DBIx::Class::ResultSet#find_or_new
find_or_create()
このメソッドを実行した時点で、DBにレコードがINSERTされる。その際、id以外のカラムはNULLになる。
update_or_new()
$user = $rs->update_or_new({ id => 10, name => 'taro' },{ key => 'primary' }); $user->update; # または $user->insert
- idが10のレコードが存在すればそのrowオブジェクト(nameはtaro)が、なければ新規のrowオブジェクト(idは10、nameはtaro)が作られる。。
- http://search.cpan.org/perldoc?DBIx::Class::ResultSet#update_or_new
update_or_create()
このメソッドを実行した時点で、DBにレコードがINSERTまたはUPDATEされる。