だったのですが、帰宅したら、会社から手紙が来てました。 かなりうれしかったっす。 みんなありがとう！！ おいらがんばるよ。

Cache::Memcachedのパッチを取り込んでもらえる予定。 Gooood!

なんとなくね。 MTっぽいすな。http://blog.livedoor.jp/nekokak/

一応6Aのリポジトリからcoしてきてそれにパッチした。 http://code.sixapart.com/svn/memcached/trunk/api/perl/ テスト超適当だけど、どうかなぁ。 $ svn diff Index: lib/Cache/Memcached.pm ===========================================================…

ircで「やるぞ」と叫ぶと、irc上１０行をTODO管理システムに簡単に登録できるようにしたあとircで「TODO:ほげる」と叫ぶと、同じくその行をTODO管理システムに簡単に登録できるようにしたみんなはたらけー。POE使えば簡単にでけたよ。 ぽぇ〜。

やばす。 超簡単にできたヨ。POE::Component::Daemon->spawn(detach=>1, max_children=>1);この一分だけっすよ。 すごすすごす。

メッセージを１０件までスタックしたかったの。 で、こんなコードを書いたの。 use Readonly; Readonly my $STACK_MAX => 10; my @STACK_MSG; push @STACK_MSG ,"($sender) $msg"; if (scalar(@STACK_MSG) > $STACK_MAX) { shift @STACK_MSG; }微妙とか言わ…

今日の最後はBotと戯れてた。http://plagger.org/trac/browser/trunk/plagger/bin/plagger-ircbotこれとかかなり参考になる。 終わり間際うまくいかなかったけど、多分設定ファイル修正すればいくんじゃないかな。 ircにちゃんとjoinできてなかったみたいだ…

実践ハイパフォーマンスMySQLposted with amazlet on 06.08.19ジェレミ・D. ザウドニ デレク・J. ベリング Jeremy D. Zawodny Derek J. Balling 林 秀幸 オライリージャパン (2004/10)売り上げランキング: 14,643おすすめ度の平均: MySQLの裏技集 もう少し分…

なんかすでにありそう。 コードはSledge::Cacheのまんまパクリ。 package Cache::Memcached::CallBack; use strict; use warnings; use base 'Cache::Memcached';sub get_callback { my ($self, $key, $callback, $expiry) = @_; my $data = $self->get($key…

http://d.hatena.ne.jp/tokuhirom/20060816/1155709160 #! /usr/bin/perl use strict; use warnings; use IPC::Run qw(run timeout);my $SVN_STAT = 'svn stat';for my $line (`$SVN_STAT`) { if ($line =~ m/(.+\.p[lm])/) { next if $line =~ /$0/; $line …

明日は当番じゃのう。 明日はお客さんもいるらしい。 MoFedge::D::D::Schemaをやるよてい。 そのうちDBICもやりたいなぁ。

８月頭に出した原稿がいい感じのPDFであがってきた。 なんか自分の書いたものが見た目よろしくなってるのがすげーうれしかった。 校正がんばるぞー。

朝から「顔色わるいですね♪」とか言われた。 きぃーわるいわ！

DBI->trace(1 => \*STDERR);とかつかったし〜。

やばす！ 最高。 ここ数日これしか聴いてない。 BONNIE PINKは昔から好きだったけどやっぱいいわー。昔の曲も新鮮にきけるなぁ。Every Single Day -Complete BONNIE PINK (1995-2006)-posted with amazlet on 06.08.16BONNIE PINK ワーナーミュージック・ジ…

http://d.hatena.ne.jp/lestrrat/20060815#1155614343Loaderはリレーションのかけかたが微妙だったので、 （前にちょっと試しただけで、そうでもないかもしれませんが） 自前でやるようにしました。ただそれだけで、たいした意味はありませぬ。 MoFedge::Dat…

まるごとPerl! Vol.1posted with amazlet on 06.08.13小飼 弾 宮川 達彦 伊藤 直也 インプレスコミュニケーションズ (2006/08/24)Amazon.co.jp で詳細を見るやっぱりこれは買いかなぁ。

http://plnet.jp/nekokak試してみた。

Makiさんが、 http://d.hatena.ne.jp/lestrrat/20060811#1155274519 こういうHackをしていたので、書かずには居られなくなった。一部切抜きでご紹介。 （DataTimeにインフレートしてるところだけをご紹介） これがMoFedge::Data::DBIC::Schemaだ！！ package…

http://nekokak.vox.com/

前の会社の後輩に出会った。 元気そうでなにより。 色々聞きたかったんだけど、実は頭痛がひどくてすぐにバイバイした。

今日は _on _at created_on updated_on を自動でDateTimeにInfleteするようにしてみた。 InflateColumn::DateTimeは使ってない。あとは_auto_belongs_toってので 自動でbelongs_toしてくれるクンも作ってみた。イイ感じ。

package DB::MyTestSchema::Student;use strict; use base qw|DBIx::Class|; my $pkg = __PACKAGE__;$pkg->load_components( qw| PK::Auto Core | ); $pkg->table('students'); $pkg->add_columns(qw|id first_name last_name age|); $pkg->set_primary_key(…

あついだろうなぁ。 数日間落ちる予定。

テスト環境でMIME::Lite::TT::Japanese使うとき、 実際に外部にメールしたくない。 (したいときもあるかもしれないけど、通常はしなくていいはず。) あぶないしね。なにかと。そんなとき、こうするとよい。 my $mail = MIME::Lite::TT::Japanese->new( %$arg…

とりあえずイイ感じ。 Catalystとかと同じ感じで $self->model('Memo')->find(1);こんな感じで呼び出せる。TODOとしては リレーションオート設定（Schema::Loaderはなんか信用なら無いため。ってかLoaderベースで作ってないし。） DATE系のオート設定 R系メ…

DBICのバージョンを最新にしてやるぜ！と思いごりっと入れてみた。 プロジェクトで使ってたバージョンは確か0.00400かな。まず、Module::Buildが最新じゃなかったのでエラー祭り。 うがー。Module::Buildを最新にしたら問題なくインストール完了。 とあるプ…