とりあえず決め打ちでDigest::SHA1でいいから簡単に使えるのを作った。 CPANにアップされているDBIC::DigestColumnsは設定項目が大杉。 そんなにいらんし。 昔オイラもDBIx::Class::DigestColumnsを作ってDBICのMLにながしてて 放置してたらだれかが別で作っ…

Web Site Expert #09posted with amazlet on 06.11.23Web Site Expert編集部 技術評論社 売り上げランキング: 33811Amazon.co.jp で詳細を見る画像でてませんが＞＜ おもしろかったす。みかんくんカワイス。 ぶっださんいい味だしすぎｗ

http://en.yummy.stripper.jp/?eid=448071 DBICではたぶん発行するSQLのカラムに別名をつけられないみたいなので スカラーリファレンスでしかたないんじゃないすかね。どしても嫌だったら、 my @results = reverse sort {$a->get_column('posts_count') $b->…

私のDBICねたは基本 http://code.mfac.jp/trac/browser/MoFedge-Data-DBIC-Schema/ このモジュールを使って実験してます。 なので $self->modelとか出てきたらそれは DBICのPODとかでいうところの$schemaとかと適宜置き換えてください。

そういえばとあるところで質問を受けたので。 その質問を補う形で。DBICを使った場合でも普通にネストしたループは使えるわけですが、 TTの場合。 [% WHILE (blogger = blogger_ite.next) %] [% FOR entry IN blogger.entries %] URL:[% entry.url %] [% END…

naoyaさんから突っ込まれましたが、まさにそのとおしでした＞＜；http://naoya.g.hatena.ne.jp/naoya/20061117/1163769268ふつうにadd_unique_constraintしていなくても my $user = $self->model('User')->find( { rid => 'WFC2nT4MLl' } );これできますね。…

今のところ、あまり必要に迫られているわけではないのですが、 覚書程度にDBICのmany-to-manyを試してみます。Memberテーブル：Addressテーブル = n : m みたいなな感じで。 package Proj::Schema::Member; use strict; use warnings; use base 'Proj::Schem…

格言「困ったら、Scalarりふぁれる」。です。はい。本日もDBICネタですが、DBICのRで困ったらスカラーリファレンスです。はい。 $self->model('User')->search( { 'me.created_on' => \'IS NULL', } )->first;created_onはDATETIME型とします。 こんな感じで…

DBICのresultset_attributesを使うとデフォルトの検索条件とか ソート条件を指定できます。 package Your::Schema::User; use strict; use warnings; use base 'DBIx::Class';__PACKAGE__->table('user'); __PACKAGE__->resultset_attributes({ order_by => …

RDBMSではプライマリーキーになるカラム以外にユニークに なるカラムってあるわけです。弊社の場合ridというカラムが全てのテーブルにありまして、 それがユニークなカラムになっております。 ridには完全ランダムにユニークとなる値が入っております。それ…

また、きてます。 仕事中もききまくり。 最近はこれがお気に入り。 ピアノJazzが好きな人なら気に入るはず。Tenderlyposted with amazlet on 06.11.11ロニー・ヨハンソン・トリオ インディペンデントレーベル (2004/01/21)Amazon.co.jp で詳細を見るRonnyは…

アミ小さな宇宙人posted with amazlet on 06.11.11エンリケ・バリオス 石原 彰二 徳間書店 売り上げランキング: 3091おすすめ度の平均: このページを見てるあなた！買いましょう！！ Congratulations ♪just beginninｇ･*:..｡★*ﾟ¨ﾟﾟ･*:..｡★* 地球にいる全ての…

お勧めです。宇宙授業posted with amazlet on 06.11.10中川 人司 サンクチュアリ出版 売り上げランキング: 18584おすすめ度の平均: 夢があってよいですけど… 幼い頃の疑問がスッキリ 宇宙は身近な問題Amazon.co.jp で詳細を見る

この連休を使って読んだ。 実質は１日かかってないけど。 面白かった。なんか自分も旅ほどではないけど、日常生活から抜け出して 時間をすごしてみたいなぁと思った。 お遍路参りしたいなぁ。 どれくらいの日数があればできるかな。幸福論posted with amazle…

色々とぶろぐも作ってきましたが、どこに何をPostするか中途半端になってきたです。 なので、整理しますよ。 Hatena 色々Perlのこととか use Perl; http://use.perl.org/~nekokak/journal/ Sledgeになるべく特化 VOX Vox - Understand the News 豆腐とDBIC m…

ircで色々教えてもらった。 http://rafb.net/paste/results/UdqEr958.html こんなんとか。これでよかった。やりたかったことは@hoge & @mogeな絞込み。 この意図がうまく伝えられてなかったですね＞＜http://search.cpan.org/~samv/Set-Object-1.18/lib/Set/…

なんか、 ある配列にある値から 別の配列にある値だけをある配列から抜き出して 新しい配列をつくりてーってことがままあるわけですが、 List::MoreUtilsとかになかったのですなぁ。 package List::Grep; use strict; use warnings; use base 'Exporter'; us…

http://use.perl.org/~nekokak/journal/use Perl;はじめてみまんた。 英語は超苦手なんですが、逃げてばっかりも居られないので＞＜