1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 | use strict; use warnings; package Controller; # $c->model();を使うアレ。今こんな感じ。 # $c->model();使うの微妙かなと思えてきた。わからん my $user = $c->model('User'); my $user_info = $user->get_user_info(user_id => 1); package Controller; # 複数ゲットが無理っぽ # newでDBにアクセスして取ってくる的な?newよりfindが自然か。DBIx::Classでいいよねって話になりそう。 # ボツ use Tumfav::Model::User; use Tumfav::Model::Quest; my $user = Tumfav::Model::User->new(user_id => 1); my $user_info = $user->get_user_info; package Controller; # Rowを拡張しまくる # Controllerの中でDBにアクセスしてる。 # $cにdbメソッド生やしたくない。Controllerでcreateとかをさせないため。 # 簡単に出来てしまうとやってしまうよねと思うので、出来ないようにする。こういうの大事な気がする。 # Controllerでdbを触らせないって無理があるかなあ。 # 一応ボツ use Tumfav::Model::User; use Tumfav::Model::Quest; my $db = $c->db; my $user = $db->single('users' => {id => 1}); my $user_info = $user->to_hash_ref; package Controller; # Modelを拡張する # $c->model();なし。 use Tumfav::Model::User; use Tumfav::Model::Quest; my $user = Tumfav::Model::User->new(); my $user_info = $user->get_user_info(user_id => 1); package Controller; # 別にblessする必要ないなあって思えてきた。 use Tumfav::Model::User; use Tumfav::Model::Quest; my $user_info = Tumfav::Model::User->find(user_id => 1); my $user_info = Tumfav::Model::User->create('user name' => {}); |
わからない。

hisaichi5518がPerlを書いて、つついて、イチャイチャするブログ。最近はnode.jsもやってる。



最近の記事
最近のコメント
リンク
ページ
カテゴリ
アーカイブ
タグ一覧