http://search.cpan.org/dist/Template-Plugin-Jcode/lib/Template/Plugin/Jcode.pmよりTT使うときに便利そうですね。 めもめも。

なんとなく作ってみました。Class::DBIで作ったオブジェクトのクローンが欲しいときにでもどうぞ。 package Class::DBI::Plugin::Clone; use strict; use warnings; use Carp; use Clone qw(clone); use vars '$VERSION'; $VERSION = '0.01'; sub import { m…

Class::DBIでもどんな風にSQLが実行されるかなどを見るには、DBI->traceを使います。 例えばこんなの #! /usr/bin/perl use strict; use warnings; use Data::Dumper; use Neko::OrderCust; $\ = "\n"; DBI->trace(5 => "./logfile"); my $order = Neko::Ord…

katoさんに教えていただいた方法で実装します。変更のあったモジュールのみの抜粋で、残りはClass::DBIで３テーブル検索（実行編） と同じです。./Neko/OrderCust.pmNeko::OrderCust->has_many(items => 'Neko::OrderItem'); がミソです。itemsという名前でN…

http://72.14.203.104/search?q=cache:1bNiTnZ62LcJ:www.ibm.com/jp/developerworks/linux/050331/j_l-cpdata.pdf+Class::DBI%E3%80%80%E6%B4%97%E7%B7%B4&hl=ja&start=3&lr=lang_ja後で読もう。

今回試してみるテーブル構成とテーブル作成SQLとデータです。order_custテーブル create table order_cust ( no int(10) NOT NULL auto_increment, name varchar(255) NOT NULL, PRIMARY KEY(no) ); +-------+--------------+------+-----+---------+-------…

で、はまってます。例えば、 __PACKAGE__->has_a( DATE => 'Time::Piece', inflate => sub { Time::Piece->strptime(shift, "%y/%m/%d %H:%M:%S") }, deflate => 'ymd', );こんな感じでTime::Pieceにマッピングするのはいいのだが、 OracleでのデフォルトのD…

マッピングモジュールに少し変更を入れて試してみました。とりあえずまた、全部記載します。./Neko/DBI.pm package Neko::DBI; use strict; use warnings; use base 'Class::DBI'; Neko::DBI->connection('dbi:mysql:nekodb','nekokak','******'); 1;./Neko/…

テーブル構成に問題があるので、テーブル構成を変更する。order_itemテーブルを以下のように変更。 create table order_item ( no int(10) NOT NULL, no_sub int(10) NOT NULL, item_no int(8) NOT NULL, PRIMARY KEY(no,no_sub) ); +---------+---------+--…

MySQLを入れなおしたので、まだ入れてなかったDBIとDBD::mysqlを入れてみる。 sudo perl -MCPAN -e shellでCPANを起動。 CPAN> install DBIで、インスコ。問題なし。 CPAN> install DBD::mysqlで、インスコ。これも問題なし。テストスクリプトを作成。 #! /u…

自宅ColinuxのDebianにMySQL入れてたんだけども、 パスワードがわからなくなた。。。（なんて恥ずかしい）なので一旦、MySQLを削除して入れなおす。DebianでMySQL削除の為に入れたパッケージ sudo apt-get install aptitudeインストール後、 sudo aptitude p…

http://tokuhirom.dnsalias.org/~tokuhirom/tokulog/2135.htmlよりClass::DBIについてのいろいろなメモです。

http://d.hatena.ne.jp/tociyuki/20051022/1129952410よりなるへそ。

katoさんよりいろいろと教えてもらいましたので、 少し纏めてみます。CDBIやRubyのActiveRecordは、基本的に1テーブル1クラス対応の O/Rマッピングになります。これが大前提です。./Moge/DBI.pm package Moge::DBI; use strict; use warnings; use base 'Cla…

katoさんより、 どうしてもリレーションがアレな 複数のテーブルをCDBIでキレイに扱いたければ Class::DBI::Viewがいいかもしれませんね。と、アドバイスいただいたので試しました。./NekoView/DBI.pl package NekoView::DBI; use strict; use warnings; use…

おれはあほか。 この場合Neko::Pageすら(ﾟ〓ﾟ)ｲﾗﾈ./Neko/DBI.pm package Neko::DBI; use strict; use warnings; use base 'Class::DBI'; __PACKAGE__->connection('dbi:mysql:nekodb', 'nekokak', '*****'); 1;./two-table-cdbi2.pl #! /usr/bin/perl use st…

とりあえずClass::DBIだけで実装してみました。./Neko/DBI.pm package Neko::DBI; use strict; use warnings; use base 'Class::DBI'; __PACKAGE__->connection('dbi:mysql:nekodb', 'nekokak', '******'); 1;./Neko/Page.pm package Neko::Page; use strict…

http://www.lost-season.jp/mt/2005/10/200510182.htmlよりCatalystのテストサーバが自動再起動に対応したそうです。 １秒ごとにチェックして更新ファイルがあると再起動させるみたいです。 ってかかなり便利ですね。

今日は徹夜してるのですが、 結構みなさん遅くまでBlog更新してるのですね。いや〜関心関心ｗ普段は気にしていないBlogの更新時間が今日は気になりました。

ちょっと思ったけど、このサイトの右上にあるカレンダー必要ないよね。。。 はずそかね。あと、右側のMonthly Archives とかRecent Entries は文字サイズもう少し小さくてもいいかな。そしてGoogle検索はいらないよねｗってな感じで再構築かけてみよかな。

http://qootas.org/blog/archives/2005/10/use_utf8_use_fi.htmlより眠いけどわろたｗ

このサイトのソースがあまりにも醜いので せこせこ構築しなおしました。 あ〜つかれた。

表題の通りなのですが、できません（;´Д｀）ちょっといろいろ試してみたのですが上手くいきません。 今日はお手上げです。試したことを以下にこんなテーブル構成で考えて見ます mysql> desc pages; +-----------------+--------------+------+-----+--------…

http://cdbi.dcmanaged.com/wiki/Main_PageClass::DBIのWikiです。 日本語版がほしいなぁ。 絶対に需要あると思うけどなぁ。

http://shugo.net/jit/20051013.html#p01よりRuby on Railsの聖典？ Agile Web Development with Rails の和訳を出版予定にしているみたいです。ちょっと興味ありです。

風邪っぴきです。 だんだん声出すのがつらくなってきました。 次長課長の次長？みたいな声になってきたと自分では思ってます。 しんどいよ〜。

http://search.cpan.org/~btrott/Data-ObjectDriver/よりsixapartからついにでました。 PerlでのO/RマッピングってったらなんてったってClass::DBIでしょう。 はたしてClass::DBIに取って代われるのでしょうか？？ってことで試してみました。 PODを読んでた…

OOP やっぱ必須ですかね？

以前、翻訳したParallel::ForkManagerと自作のURI::Fetch::SimpleCacheを あわせてみました。以下ソース package URI::Fetch::SimpleCache::Parallel; use strict; use warnings; use URI::Fetch::SimpleCache; use Parallel::ForkManager; use FileHandle; …

http://search.cpan.org/~lunatic/Text-ASCIITable-0.17/より Catalystでも使われてるモジュールです。 テキストファイル形式でのレポート作成なんかに重宝しそうですね。サンプルは以下 #! /usr/bin/perl use strict; use warnings; use Text::ASCIITable; …