Teng でリレーションを使う方法 - amari3の日記
前回は Teng でトランザクション処理をする方法を紹介しました。実際に色々試して、ブログに書くと頭にいい感じで入ってくるので続けていきたいです。今回は Teng でリレーションを使う方法を紹介していきます。 題材 説明に使用する題材は、掲示板へのエントリとそれに対するコメントの様なものを想定。 使用するテーブル 以下の2つのテーブルを使用します。 test@localhost:testdb> desc entry; +------------+------------------+------+-----+---------------------+----------------+ | Field | Type | Null | Key | Default | Extra | +------------+------------------+------+-----+---------
Teng でリレーションを使う(メモ)｜perl｜@OMAKASE
はじめに いつもORM(O/Rマッパー)のDISられ具合がひどいですが自分的には大大好きなんです。何が好きかっていうとリレーション設定が簡単にできるとかinflateとかdeflateも自動でやってくれるし開発効率もグッと上がります。こんな便利なもの使わない方がおかしいと思うぐらいです。生のDBIをたたいて省メモリでecoなシステムを目指すのもいいですが一昔前に比べればマシンパワーも上ってる事だしどんどん使いましょうよ。 ちなみにいつも使ってるO/RマッパはDBIx::Classです。 そういえば昨日バージョンがTeng-0.14になったばかりでしたね Tengから利用する基本クラスを定義 Tengを操作するクラスを定義します。 MyAppプロジェクトでTengを使う場合 package MyApp::Model; use parent 'Teng'; 1; 基本となるのはたったこれだけで
ビギナーだから使いたいO/Rマッパー ～Tengを使った開発～
6. O/Rマッパーだと開発が抜群に早くなる 複数データ群をリレーションつけて登録する場合のコード比較 DBI Teng use DBI; #Teng-0.14_05 use DBI; my @data_set = ( use Teng; [26,'hiro'], use Teng::Schema::Loader; [27,'bane'], ); my @data_set = ( [26,'hiro'], my $dbh = DBI->connect("DBI:mysql:db_name;", "root", "pass",{ [27,'bane'], AutoCommit => 0, ); }); my $dbh = DBI->connect("DBI:mysql:db_name;", "root", "pass",); for my $data (@data_set) { my ($a
実践Teng — Teng-Doc 0.01 documentation
Navigation index next | Teng-Doc 0.01 documentation » 実践Teng¶ Contents: この文書について この文書は何ではないか? この文書で説明すること 表記について Tengの特徴 Tengとは クイックスタート はじめに 環境の準備 DBの作成 テーブルの作成 データの挿入 クエリの確認 データの検索 データの削除 データの変更 まとめ やってみよう 逆引きレシピ 逆引きレシピについて 一般編 Rowオブジェクト編 SQL編 Indices and tables¶ Index Module Index Search Page Table Of Contents 実践Teng Indices and tables Next topic この文書について This Page Show Source Quick search Ente
にひりずむ::しんぷる - DBI で実際に発行されるクエリーを取得する DBIx::QueryLog を書いた
季節が変わって、早速風邪をひいています。 さて、もう秋を通り越して冬の様相を呈してきた昨今ではありますが、DBI では、普通はプレースホルダを使い my $stmt = 'SELECT * FROM user WHERE user_id = ?'; my @bind = ($user_id); $dbh->do($stmt, undef, @bind); とか書くと思います。 このときに、実際にバインドされた後の SQL をみたいなーって衝動に駆られると思いますが*1、どう頑張ってドキュメントを読んでもわかりませんね。 こういうときは仕方ないので、$stmt と @bind を両方ログに出してお茶を濁していました。 $self->log->_dump($stmt, @bind); # => SELECT * FROM user WHERE user_id = ?, [1234] でもこれっ
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
