How do you trace your query with DBI DBIx::QueryLog とかつかわなくても Callbacks を駆使すれば結構いけるよ!っていう話になった。いいね。 use strict; use warnings; use DBI; my $dbh = DBI->connect('dbi:SQLite:','','', { RaiseError => 1, Callbacks => { ChildCallbacks => { execute => sub { my ($obj, @binds) = @_; my $stmt = $obj->{Database}->{Statement}; $stmt =~ s/\?/'$_'/ for @binds; print STDERR $stmt, "\n"; return; }, }, }, }); $dbh-
Catalyst::Model::DBIを使う。以上……なんですが、分家の方に質問をいただいたのでいちおうこちらにも書いておきます。 DBIx::Classを使いたいけど生のSQLも書きたいというときはスカラーリファレンスを使うとよろし、というのはDBIx::Class::Manual::Cookbookの「Arbitrary SQL through a custom ResultSource」の項あたり。これ、先日ktatさんが0.07006の訳をperldoc.jpで公開されていますね。Catalystのマニュアル類もnitsujiさんのところでだいぶ整備されています（2007/05あたり）。うちのはかなり古くなっているので、あんまり参考にしない方がよろしいかと（もう少し余裕ができたら整備し直すつもりはありますが）。 追記：livedoorクリップより 2007年07月06日 toku
DBI::Changes - List of significant changes to the DBI - metacpan.orgによれば、 今回は結構意欲的なバージョンアップのようですね。 パフォーマンス面 Changed some handle creation code from perl to C code, to reduce handle creation cost by ~20%. Changed connect_cached and prepare_cached to avoid a FETCH method call, and thereby reduced cost by ~5% and ~30% respectively. handleを生成するコードがperllからCになって、速くなったみたいですね。 それとconnect_cached, prepared_c
あけましておめでとうございます。 新年も RT にあがっているパッチをあてながら DBIx::Simple 1.26 を使っています*1。 以前から書いてるとおり DBIx::Simple + SQL::Abstract は小粋ですばらしいんですが，吐いた SQL 文を調べる機能がありません。どうせ DBI 自体にトレース機能あるんじゃね？と思ってドキュメントを見たら，やっぱりありました。 my $db = DBIx::Simple->connect( ... ); $db->dbh->trace(1); #$db->dbh->trace(1, 'sql.log'); # ログファイルを指定する場合 出力先としては STDOUT, STDERR か何らかのファイル名を指定することしかできないのでロガー等を通して出すことができません。あくまで困ったときの知恵ということで。 ちなみにログレベル
なんちゃってマッパ DBIx::Simple DBIC などの O/R マッパを使うほどじゃないけど DB 操作で楽したい，という場合には tomi さんも御推薦の DBIx::Simple があります。tomi さんもお書きのように結構致命的なバグ（その1，その2）が放置されているのが悲しいところですが。 DBIx::Simple を生の状態で使ってもそれほど有難味がないですが，周辺モジュールがインストールされていると透過的に使ってくれるので格段に便利になります。たとえば SQL::Abstract でクエリを簡単に書くことができますし，クエリ結果をテーブルにしたい場合 DBIx::XHTML_Table を使うと楽です。 さらに，DBIx::Simple::OO という拡張モジュールを別途インストールするとクエリ結果を Object::Accessor ベースなオブジェクトにしてくれま
とっても便利なClass::DBI::Sweetですが、条件無しでpagingするにはどうすればいいか悩んでたのですが解決したのでメモ。 Shop/Product.pm package Shop::Product; use strict; use base 'Class::DBI::Sweet'; __PACKAGE__->connection('dbi:mysql:shop', 'web', ''); __PACKAGE__->table('product'); __PACKAGE__->columns( Primary => qw[ product_id ] ); __PACKAGE__->columns( Essential => qw[ product_name ] ); 1; main.pl #!/usr/bin/perl -w use strict; use Shop::Pro
■ [cdbi][perl] Class::DBI::Sweet の page メソッド BETWEEN で空白混じった文字列使うとおかしな事になるような。 my $criteria = { created_on => { -BETWEEN => [ '2006-10-16 00:00:00', '2006-10-18 00:00:00', ] } }; my ( $pages, $iter ) = Hoge::Model::DB::Bar->page( $criteria, { rows => 20, page => 1, } ); 発行されたクエリ。一個目はページャ用のカウント。 SELECT COUNT(*) FROM bar me WHERE ( me.created_on BETWEEN '2006-10-16 00:00:00' AND '2006-10-18 00:00:00
この文書はClass::DBIの初期バージョンのドキュメントを訳したもので、現在のバージョンとは整合性がありません。CPAN から最新のバージョン を取得して内容を確認してください。 名前 Class::DBI - オブジェクトのシンプルな永続 概要 package Film; use base qw(Class::DBI); # Class::DBI にあなたのクラスのことを教えてあげる Film->table('Movies'); Film->columns(All => qw( Title Director Rating NumExplodingSheep )); Film->columns(Primary => qw( Title )); Film->set_db('Main', 'dbi:mysql', 'me', 'noneofyourgoddamnedbusiness', {
名前¶ Class::DBI - シンプルなデータベース抽象クラス 概要¶ package Music::DBI; use base 'Class::DBI'; Music::DBI->connection('dbi:mysql:dbname', 'username', 'password'); package Music::Artist; use base 'Music::DBI'; Music::Artist->table('artist'); Music::Artist->columns(All => qw/artistid name/); Music::Artist->has_many(cds => 'Music::CD'); package Music::CD; use base 'Music::DBI'; Music::CD->table('cd'); Music::CD->c
CDBI を使ってて、 __PACKAGE__->set_sql(Foo =><<'SQL'); SELECT __ESSENTIAL__ FROM __TABLE__ WHERE foo = ? AND bar = ? SQL sub do_something { my($class, $foo, $bar) = @_; my $sth = $class->sql_Foo; $sth->execute($foo, $bar); return $class->sth_to_objects($sth); }Class::DBI::Plugin::Iterator を use しておいてこんなんしとくと、CDBI の $VERSION が古いやつの場合に、scalar context で動いてくれない。 動いてくれんというか、空っぽの Iterator が返る。 3.x 系ではちゃんと動いたん
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
Class::DBIとTime::Piece MT::Neko::kak 500 Internal Server ErrorのnekokakさんがClass::DBI::Plugin::TimePieceという記事をアップされてます。 Class::DBIとTime::Pieceの連携(infalte/defalte)はClass::DBI::mysqlの実装がいい感じです。 autoinflateで一発。 __PACKAGE__->autoinflate(column_type => 'Inflation::Class'); #カラム型=>クラス __PACKAGE__->autoinflate(timestamp => 'Time::Piece'); __PACKAGE__->autoinflate(datetime => 'Time::Piece'); __PACKAGE__->au
Class::DBIで複数データベースを扱う+register_cleanup Class::DBIで同じ構造の複数データベース扱う時には、まかまかさんのClass::DBI::Plugin::MultiDatabases(後で知った)や、Class::DBIのWikiにあるけど、さらにmod_perl上でのTips ちょっと実際書いたコードと違うので全くこの通りでうごくかどうか心配なのですが、複数データベースに接続をするモジュールを下のように書いてみる。 package Object; use strict; use DBI; use base qw(Class::DBI); use Class::DBI::Plugin::NoCache; use MyConfig;#データベースの接続情報を返すモジュールとする __PACKAGE__->mk_classdata('dbhandles'
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
DBIx::ClassでmysqlのFULLTEXTインデックスに対する検索をより美しく使うにはどうすればいいかなぁ、と考えた結果search_literalを使えば良いかと思い立った次第です。 こんなテーブルで CREATE TABLE table01 ( id INT UNSIGNED AUTO_INCREMENT NOT NULL, PRIMARY KEY(id), title VARCHAR(255), artist VARCHAR(255), review TEXT, FULLTEXT(review) ); Schemaを作って、こんな感じに走らせると use strict; use warnings; use CD::Schema; my $schema = CD::Schema->connection('dbi:mysql:cd', 'user', 'password');
WEB+DB PRESS vol33の「ライブドア構築ノウハウ大公開」でClass::DBIの永続化を切るには、Ima::DBIの内部でクロージャとして生成されるdb_Mainをオーバーライドすれば永続化を切ることができるという記述がありました。 これなんですが、先日あるアプリを作成しているときに、db_Mainをオーバーライドしても永続化されてしまうという現象にあいました。 いろいろ調べたり、にぽたんとかに聞いたりした結果、db_Mainをオーバーライドしているクラスで __PACKAGE__->set_db() もしくは __PACKAGE__->connection() をしていたのが悪かったということが判明しました。なぜなら __PACKAGE__->set_db() もしくは __PACKAGE__->connection() をすると、Ima::DBIではなくClass::DB
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
