YanoRyuichi.com/
Wiki
Blog
GitHub
Sandbox
開始行:
* INSERT / DELETE / UPDATE 基本[#e95b7f63]
** INSERT [#v04fa531]
my $user = $rs->create({
name => "taro",
email => "taro@example.com"
});
*** DBの関数を使う [#k6b50985]
my $user = $rs->create( { create_time => \'NOW()'} ); # ...
*** シリアル型のキーを取得（last_insert_id()） [#h69eb3c1]
$user = $rs->create( { name => "taro" } );
$id = $user->id;
** UPDATE [#q20c4427]
*** 1件更新 [#fbf6571d]
$rs->email('taro@example.com');
$rs->update;
または
$rs->update( { email => 'taro@example.com' } );
*** まとめて更新 [#r7dd22b3]
$rs->search( { name => 'taro' } )->update_all( { email =...
http://search.cpan.org/perldoc?DBIx::Class::ResultSet#cre...
** DELETE [#h93214b1]
*** 1件削除 [#fb31d50c]
$rs->find(3)->delete();
*** まとめて削除 [#o71a7c5d]
$rs->search( { name =>'taro' } )->delete_all;
** INSERT兼UPDATE [#k23cd99b]
*** find_or_new() [#rbf3ca5c]
キーで検索し、見つかれば既存レコードを返し、なければ新規...
my $user = $rs->find_or_new(id => 10); # プライマリキ...
if ($user->in_storage) { # $userが既存レ...
$user->update({name => 'taro'}); # 既存レコード...
} else {
$user->name('taro'); # 新規レコード...
$user->insert;
}
- プライマリキー以外で検索する場合、( { name => 'taro' },...
- idがシリアル型（AUTO_INCREMENT）の場合、id => undef と...
- http://search.cpan.org/perldoc?DBIx::Class::ResultSet#f...
*** find_or_create() [#qcfe88be]
キーで検索し、見つかれば既存レコードを返し、なければ新規...
my $user = $rs->find_or_create(id => 10, name => 'taro')...
...
if ($user->in_storage) { ...
}
*** update_or_new() [#i2d68b0c]
キーで検索し、見つかればUPDATEしてレコードを返し、なけれ...
$user = $rs->update_or_new(id => 10, name => 'taro'); # ...
# ...
if ($user->in_storage) { # ...
$user->insert; # ...
}
- http://search.cpan.org/perldoc?DBIx::Class::ResultSet#u...
*** update_or_create() [#mbbafd1d]
キーで検索し、見つかればUPDATEしてレコードを返し、なけれ...
my $user = $rs->update_or_create(id => 10, name => 'taro...
...
if ($user->in_storage) { ...
}
↑実際に一番よく使うのはコレ？
終了行:
* INSERT / DELETE / UPDATE 基本[#e95b7f63]
** INSERT [#v04fa531]
my $user = $rs->create({
name => "taro",
email => "taro@example.com"
});
*** DBの関数を使う [#k6b50985]
my $user = $rs->create( { create_time => \'NOW()'} ); # ...
*** シリアル型のキーを取得（last_insert_id()） [#h69eb3c1]
$user = $rs->create( { name => "taro" } );
$id = $user->id;
** UPDATE [#q20c4427]
*** 1件更新 [#fbf6571d]
$rs->email('taro@example.com');
$rs->update;
または
$rs->update( { email => 'taro@example.com' } );
*** まとめて更新 [#r7dd22b3]
$rs->search( { name => 'taro' } )->update_all( { email =...
http://search.cpan.org/perldoc?DBIx::Class::ResultSet#cre...
** DELETE [#h93214b1]
*** 1件削除 [#fb31d50c]
$rs->find(3)->delete();
*** まとめて削除 [#o71a7c5d]
$rs->search( { name =>'taro' } )->delete_all;
** INSERT兼UPDATE [#k23cd99b]
*** find_or_new() [#rbf3ca5c]
キーで検索し、見つかれば既存レコードを返し、なければ新規...
my $user = $rs->find_or_new(id => 10); # プライマリキ...
if ($user->in_storage) { # $userが既存レ...
$user->update({name => 'taro'}); # 既存レコード...
} else {
$user->name('taro'); # 新規レコード...
$user->insert;
}
- プライマリキー以外で検索する場合、( { name => 'taro' },...
- idがシリアル型（AUTO_INCREMENT）の場合、id => undef と...
- http://search.cpan.org/perldoc?DBIx::Class::ResultSet#f...
*** find_or_create() [#qcfe88be]
キーで検索し、見つかれば既存レコードを返し、なければ新規...
my $user = $rs->find_or_create(id => 10, name => 'taro')...
...
if ($user->in_storage) { ...
}
*** update_or_new() [#i2d68b0c]
キーで検索し、見つかればUPDATEしてレコードを返し、なけれ...
$user = $rs->update_or_new(id => 10, name => 'taro'); # ...
# ...
if ($user->in_storage) { # ...
$user->insert; # ...
}
- http://search.cpan.org/perldoc?DBIx::Class::ResultSet#u...
*** update_or_create() [#mbbafd1d]
キーで検索し、見つかればUPDATEしてレコードを返し、なけれ...
my $user = $rs->update_or_create(id => 10, name => 'taro...
...
if ($user->in_storage) { ...
}
↑実際に一番よく使うのはコレ？
ページ名:
