僕ト云フ事

[lazy-peole][山]表丹沢・鍋割山登ってきました

海賊たろ（小松大輔） — 2009-11-09T00:03:35+09:00

鍋割山登ってきました

高尾山、富士山、高尾-陣馬山と登ってきた我々ですが、今回はなかなか大変だった。

前日までにじわりじわりと減る参加者、前日夜になって仕事に捕まってしまった人、寝坊フラグを立ててしまった人など、登る前にリタイアが続出したw

当日朝に集まったのは、tomyhero さん、tsubotax さんと自分の3人でした。
渋沢駅で食料を調達し、うどんを食べてバスに乗って大倉へ。

渋沢駅で少しのんびりしたのもあって、予定より1時間ほど遅れての大倉出発でした。

二俣までの道のりは緩く長く、ずいぶん歩いた。この時点で少し tomyhero さん、tsubotax さんの足手まといにw

二俣を経過したあたりから傾斜がすごくきつかった。赤ちゃん背負ったお父さんとか見たけどスゲーなーという感じだった。

二俣過ぎた後は、登っては休憩を入れて、という感じで進んでいたので、そこでお会いした老夫婦に休憩中に道を譲ったり、譲られたりしながら山頂まで登っていった。ちなみに山頂には老夫婦の方が先に着いてました。明らかに自分が足を引っ張ってました。サーセン >_<

もう道のほとんどが木の根っこでできた階段で、だんだん膝が上がらなくなり、道を譲ってもらうときに「いやぁ、これは足があがらなくなりますねー」なんて言ったら、先行く tomyhero さんに「おいそこ、言い訳せんではよこい」とか言われたり。

鍋割山山頂にある山荘が見えたところで tsubotax さんが走って登りだしたのもきつかったw
しかも全然山頂に届く距離ではなく、下山中の方がだいぶ先の方でよけてくださったがためにそこまでは走り抜かないと行けなくなったりとかw

山頂で二人は名物の鍋焼きうどんを食べてましたが、自分はもう胃に入れられる状況ではなくて、コーヒー飲んだ。

山頂までの道のりで何度かお会いした老夫婦にはチョコレート頂きました。ありがとう。

ちなみに出発が1時間遅れたにもかかわらず山頂到着は予定時刻だった。通常よりはハイペースなんじゃないでしょうか！

そして、少しのんびりしすぎたせいか、山頂には山荘に泊まる人以外残ってない状況になってから下山開始したりして。
下山がまた大変だった。陣馬山の下山も急傾斜だったけど、今回も大変だった。直滑降ではなかったのが良かったくらい。膝が笑ってしまって押さえ効かなくて転けたりとか。

靴擦れ、爪の中の内出血とかはだいたい下山でできる。陣馬山もそうだった。

tsubotax さんが山荘の方から聞いた話だと、日が落ちるとほんとに真っ暗になると言われて急ぎ足で下りてたんだけど、日が落ちきる前に二俣まで戻れたので大丈夫でした。
下山中の夕日に染まる山々はなかなか良かったような気がします。

あとわずかと言うところで日が落ちきってしまったけど、ライト持ってきてたのでそこで合流した家族の方と一緒に大倉までの道のりを同行した。「もう暗いし歩けないよー」と泣いていた男の子がなんか微笑ましかった。

そんな感じで登ってきましたー。tomyhero さん、tsubotax さんお疲れさまでした−。
足腰が痛い！

]]> [lazy-peole][山]

[life]0x20 歳になりました！

海賊たろ（小松大輔） — 2009-11-06T20:36:28+09:00

べたべたなネタですがとうとう 0x20 歳になりました。CGI な掲示板の改造から perl プログラミングに入ったころ、プログラマらしき人の日記でこういうネタをたまに見かけては、自分もいつかやろうと思ってた訳ですが、0x20 の意味を知ったときは「だいぶ遠いなぁ、忘れそうだなぁ」と思ってたけど思い出してしまいましたw 遠かったw

こんどから自分の年を数えるのに両手が必要です。もういいか、この手のネタは。
あー、30girl の加奈子さんと寺島くんと同い年になってしまったなぁー。

振り返ればいろいろあった気もします。おおよそ楽しい人生を過ごしているような気もします。イライラすることや思ったとおりにいかないのもまた人生です。不幸は幸福のアントニムではないと谷川俊太郎さんはおっしゃってました。まぁおおよそ幸せな人生を過ごしている気もしますが、満足すると死んでしまうので適度にああしたいこうしたいを持ちながら残りの人生を生きていこうと思います。まぁなんと言うか、いろんな意味で節目の歳になりそうです。

メメント・モリだ！

明日は鍋割山に登ってきます！

]]> [life]

[かるめ屋][芝居]かるめ屋「え、それで！？」

海賊たろ（小松大輔） — 2009-11-01T23:12:53+09:00

かるめ屋さんの芝居、土曜夜の千秋楽の回を観て、そのまま打ち上げに混ざってきました。

今回も劇団古田工務店の古田さんによる脚本でした。古田工務店さんは11/14-15に20回記念公演がありますね。

今回の話は笑いどころが多くて面白かった。初っぱなでまめさんの出オチかと思って吹きそうになったw アイドルはないわーw
売れないアイドル役にまめさんと大迫さん、マネージャに今泉さん、女社長役のトミーと途中に突如登場したさえない神様役のキリフさんと各々キャラが立っててよかった。

終演後、出演者関係者を交えて和む方々。

事務所を支える売れっ子アイドルのポスターの子は観客にいた。

そのまま会場内で打ち上げ。

皆さんお疲れさまでした−。

]]> [かるめ屋][芝居]

[lazy-people][山]告知: 11/07 表丹沢の鍋割山に登ります。

海賊たろ（小松大輔） — 2009-10-26T01:40:18+09:00

まさか、自分の blog でこんなにも山タグつけることになるとは思いませんでしたw
今なら「lazy-people は山に登る集団です」と答えますw
秋ということで紅葉を楽しみつつ表丹沢の鍋割山に登ります。
（自分はその余裕があるかどうか心配だ）

詳しくはここに書いてます

もし「自分も登りたい」という方がいたら、@lazy_san をフォローして教えてください。
もしくは irc.lazy-people.org:6667#project (utf-8) へ join now!

11月はこの登山に加えて、かるめ屋の芝居があったり、後輩の芝居があったり、古田工務店の芝居があったりで週末が一気に埋まったw
みんなまとまって芝居しすぎじゃないですかw

]]> [lazy-people][山]

[irc][lazy-people][ruby][twitter]IRC と twitter の橋渡しをする lazy さんを作りました

海賊たろ（小松大輔） — 2009-10-26T01:25:41+09:00

lazy people のマスコット、lazy さんの twitter ボットを作りました。今後はイベントごとがあるときはこっちにも通知していこうと思います。
また、twitter で連絡したい人は @lazy_san にもリプライすると良いと思いますよ。

@lazy_san

（@lazysan は関係ない人ですw）

@lazy_san に reply すると irc.lazy-people.org 上の #project にいる irc bot, lazy_san が IRC 内に通知してくれます。

また、IRC 上の lazy_san に話しかけると twitter 上の @lazy_san が発言します。

09:25 d**y: lazy_san: オーハーヨーーーウィ
09:25 lazy_san: d**y: lazy_san: オーハーヨーーーウィ

あとはフォローしてくれたら自動でフォロー返します。お気軽にフォローオ願いします。

ソースはここ。前回の thanksbot と同じディレクトリにいます。

前回書いた thanksbot にもフックするためにまた ruby で書きました。というか、ruby の練習台ですw
あー、thanksbot のプロセス殺して lazy_san 側で呼びかけられ方で振り分けても良いなぁ。でも nick 一覧にないと補完されなくて面倒か。

個人的には thread に触れたことがないので、こんなんで良いのかどうか気になります。

#!/usr/bin/env ruby
# encoding: utf-8
 
$LOAD_PATH << "lib"
 
require 'rubygems'
require 'net/irc'
require 'observer'
require 'lazysan'
require 'yaml'
 
class LazySan::IRC < Net::IRC::Client
 
  def initialize(config)
    @channel = config[:irc][:opts][:channel]
 
    @lazysan = LazySan::Twitter.new(config[:twitter][:user], config[:twitter][:pass])
 
    super(
      config[:irc][:host],
      config[:irc][:port],
      config[:irc][:opts]
    )
  end
 
  def on_rpl_welcome(m)
    post JOIN, @channel
    run_observe_twitter()
  end
 
  def run_observe_twitter()
    @message_thread = Thread.new do
      loop do
        begin
          @lazysan.auto_follow
          @lazysan.replies.each {|status|
            post NOTICE, @channel, "@#{status['user']['screen_name']}: #{status['text']}"
          }
        rescue
          # TODO: Net::IRC の log
        end
        sleep 300
      end
    end
  end
 
  def on_privmsg(m)
    if match = m[1].match(/^lazy_san:\s*(.*)/)
      begin
        @lazysan.update(match[1])
        post NOTICE, @channel, "#{m.prefix.nick}: #{match[0]}"
      rescue
        post NOTICE, @channel, "投稿ミスった >_<"
      end
    end
  end
 
end
 
config = YAML.load_file('lazysan.yaml')
 
lazy_san = LazySan::IRC.new(config)
 
lazy_san.start

クラス構成が LazySan::IRC と LazySan::Twitter とあって、LazySan::IRC が LazySan::Twitter に依存してるのも少し変な気がする。

プログラミング言語 Ruby

posted with amazlet at 09.10.26

まつもとゆきひろ David Flanagan
オライリージャパン
売り上げランキング: 33589

おすすめ度の平均:

最も信頼できるRubyの本
基本書にふさわしい本
rubyマスターになるために
鬱にされる鬱然たるRuby教科書
For Rubist

Amazon.co.jp で詳細を見る

]]> [irc][lazy-people][ruby][twitter]

[マンガ][東方]東方儚月抄~Silent Sinner in Blue. 底

海賊たろ（小松大輔） — 2009-10-25T23:37:23+09:00

まー、なんというか、こんな風にまとめてマンガで東方が読めるとは思わなかったです。
シューティングゲームって、たいていの場合ストーリーは置いておいてという感じなんだけど、このゲームはボス戦の前にキャラクタの会話があるからね。
キャラクタの設定とあやふやなストーリーが毎年更新されて、界隈で勝手に広がっていったあげく元の作者を原作者としてマンガが出るってのはなんか面白いですね。

東方儚月抄~Silent Sinner in Blue. 底 (3) (IDコミックス REXコミックス)

posted with amazlet at 09.10.25

ZUN
一迅社 (2009-10-09)

おすすめ度の平均:

東方初心者ですが・・・
まさに「底」というにふさわしい
東方の雰囲気が出てる
上、中ときて最後が底と・・・
好き嫌い分かれそうな内容

Amazon.co.jp で詳細を見る

このマンガ読んで、なんか久々に東方永夜抄やりたくなって魔理沙に打ちのめされたりした。風神録から先、クリアできてないんだよねぇ。ラスボスみて満足してる。スペルカードプラクティスモードが欲しいです。

あとこれを描いてる秋★枝さんのマンガは、なんというか全体的に可愛らしいくて好きです。
口元がくりんとしてたり、にへらっとした笑顔とかイライラが出てるのとか表情がいいです。今ふと思うと、自分の本棚には男性のマンガ家のマンガの方が多いんだけど、そういう差異はあるかもなぁ。

秋★枝さんのマンガは純真ミラクル100%も好きです。主人公のメンタリティが良いです。
東方のは元のネタがわからない人には全くお勧めできないですが、こっちはオリジナルなのでおすすめ。いや、好みは分かれるかもしれないけどw

純真ミラクル100% (1) (まんがタイムKRコミックスエールシリーズ)

posted with amazlet at 09.10.25

秋★枝
芳文社

おすすめ度の平均:

タイトル通り”純真ミラクル１００％”となってくれれば傑作かも
息詰まる展開
秋★枝先生の真骨頂！

Amazon.co.jp で詳細を見る

]]> [マンガ][東方]

[designpattern][moose][perl]perl で Observer パターン

海賊たろ（小松大輔） — 2009-10-12T21:20:56+09:00

Ruby で Observer パターンをやってみたところで、Perl でもやってみたくなったので書いてみました。お題はコードの世界に載っているテキスト表示の時計です。

ruby にある observer モジュールは include で mixin して使うので、Perl では Moose の Role を使って実装してみます。（モダン Perl 入門にもデザパタの章で Observer パターンがありますが、あえて ruby の observer モジュールを模してみます。）

で、これが Observable な Role です。これは時計の心臓部 Tick の Role なので Tick::Role::Observable としました。

package Tick::Role::Observable;
 
use Moose::Role;
 
has observer => (
    is => 'rw',
    default => sub { {} },
);
 
has state => (
    is => 'rw',
    default => 0,
);
 
sub is_changed {
    my ($self) = @_;
    return $self->state();
}
 
sub changed {
    my ($self) = @_;
    $self->state(1);
}
 
sub notify_observers {
    my ($self, @args) = @_;
 
    return unless $self->is_changed;
    $self->state(0);
 
    foreach my $package ( keys %{$self->observer} ) {
        eval {
            $self->observer->{$package}->update(@args);
        };
        if ( $@ ) {
            confess $@;
        }
    }
 
    return 1;
}
 
sub add_observer {
    my ($self, $obj) = @_;
 
    my $package = ref $obj;
    confess $obj . 'is not object'
        unless $package;
 
    confess $package . 'can not update'
        unless $obj->can('update');
 
    $self->observer->{$package} = $obj;
}
 
1;

このモジュールを with 'Tick::Role::Observable'; するとそのモジュールに Observer な振る舞いが付与されます。

元のお題の時計モジュールはこんな感じ。

package Tick;
 
use Moose;
 
with 'Tick::Role::Observable';
 
__PACKAGE__->meta->make_immutable();
 
no Moose;
 
use DateTime;
use DateTime::TimeZone;
use Time::HiRes qw(sleep gettimeofday);
 
sub start {
    my ($self, @args) = @_;
 
    my $tz = DateTime::TimeZone->new( name => 'Asia/Tokyo' );
    while (1) {
        my $now = DateTime->now( time_zone => $tz );
        $self->changed();
        $self->notify_observers($now->hour, $now->minute, $now->second);
 
        # micro second 単位のズレを調整
        sleep 1.0 - (gettimeofday)[1] / 1000000.0;
    }
}
 
1;

Tick->new->start すると1秒ごと sleep するループに陥ります。
1秒ごとに changed メソッドで更新フラグを立てて、notify_observers メソッドで監視者のオブジェクトに更新を通知します。

では、監視者として時刻をテキスト表示するオブジェクトを用意します。

package TextClock;
 
use Moose;
 
__PACKAGE__->meta->make_immutable();
 
no Moose;
 
sub update {
    my ($self, @args) = @_;
 
    local $| = 1;
    printf "\e[8D%02d:%02d:%02d", @args;
}
 
1;

Observable なモジュールの監視者になるには update メソッドが必要です。
notify_observer メソッドで更新通知される際には update メソッドが呼ばれるからです。
なので、 TextClock モジュールにも update メソッドを用意します。
引数には notify_observer メソッドに渡された引数が全部渡ってきます。

さて、これで時計の心臓部である Tick モジュールと TextClock モジュールができました。この二つを監視者と被監視者としてスクリプトにまとめてみます。

use Tick;
use TextClock;
 
my $tick = Tick->new();
$tick->add_observer( TextClock->new() );
$tick->start();

add_observer に update メソッドを持ったオブジェクトを渡してあげると、監視者と被監視者の関係が簡単にできます。
このスクリプトを実行すると現在時刻がテキストで表示され、1秒ごとに更新されます。

肝は接点が add_observer メソッドだけなところですね。
時計の表示を変えたくなったら update メソッドを持ったオブジェクトを作って add_observer してあげるだけで良くなります。（とコードの世界に書いてあった）

自分が普段使ってる言語で書き直せたらそれなりに理解できてるかしら？

まつもとゆきひろコードの世界‾スーパー・プログラマになる14の思考法

posted with amazlet at 09.10.12

まつもとゆきひろ
日経BP出版センター
売り上げランキング: 44091

おすすめ度の平均:

Rubyに導入された思考法

Amazon.co.jp で詳細を見る

モダンPerl入門 (CodeZine BOOKS)

posted with amazlet at 09.10.12

牧大輔
翔泳社
売り上げランキング: 18356

おすすめ度の平均:

perl経験者は読んで損はしない
Perl中級者におすすめしたい

Amazon.co.jp で詳細を見る

]]> [designpattern][moose][perl]

[irc][lazy-people][ruby]irc.lazy-people.org#project に thanksbot を復帰させました。

海賊たろ（小松大輔） — 2009-10-12T21:10:05+09:00

少し間が開いてしまいましたが、irc.lazy-people.org#project にありがとうを伝える thanksbot を放流しました。
この bot に対してありがとうを伝えると http://lazy-people.org/#ありがとう新着順の一覧に載ります。まぁ、単純なボットですね。

このチャンネルには元々 thanksbot がいたのですが、lazy-people.org Xen 化作戦失敗以降復帰させていなかったのでした。
旧 thanksbot は mojunc という tomyhero 製 Web API を使っていたのですが、これを復帰させるのがめんどうだったので Wedata を使うことにしました。ｻｰｾﾝ >_<
Wedata の使い方はこれで良いのかも謎w

そして、せっかくだからと覚え立ての ruby を使って書くことにしました。
IRC の bot 化には Net::IRC::Client を使い、Wedata への投稿には、こちらのモジュールを使わせていただきました。オリジナルの wedata.rb は、JsonParser に依存していたのですが、gem でインストールできる JSON を使うように少し修正しています。（修正したコード）

新規追加しかしないから wedata.rb は大げさだったかも。

#!/usr/bin/env ruby
# encoding: utf-8
 
$LOAD_PATH << "lib"
 
require 'rubygems'
require 'net/irc'
require 'wedata'
require 'observer'
require 'yaml'
 
require 'pp'
 
thanks_config = YAML.load_file('config.yaml')
 
class ThanksBot < Net::IRC::Client
  include Observable
 
 
  def initialize(*args)
    p args
    @channel = args[2]
    args.delete_at 2
    super
  end
 
  def on_rpl_welcome(m)
    post JOIN, @channel
  end
 
  def on_privmsg(m)
    if match = m[1].match(/^thanksbot:\s*(.*)/)
      changed
      notify_observers('', match[0])
      post NOTICE, m[0], "#{m.prefix.nick}: #{match[0]}"
    end
  end
end
 
class ThanksDB < WedataDatabase
  def update(name, message)
    create_item(name, { 'message' => message })
  end
end
 
thanksbot = ThanksBot.new(thanks_config['irc']['host'], thanks_config['irc']['port'], thanks_config['irc']['channel'],thanks_config['irc']['nicks'])
 
thanksdb = ThanksDB.new('thanks', thanks_config['wedata_api'])
 
thanksbot.add_observer(thanksdb)
thanksbot.start

ソースはここにあります。

Net::IRC::Client を継承した ThankBot と WedataDatabase を継承した ThanksDB は ovserver ライブラリを使って observer パターンで動作をひもづけてます。まつもとゆきひろコードの世界を読んでいて、これを試して見たかったというのが大きいかもw

たぶんなにげに初めて書いた ruby プログラムのような気がします。
既存のライブラリを組み合わせただけでお手軽でした。ありがとうありがとう！

プログラミング言語 Ruby

posted with amazlet at 09.10.12

まつもとゆきひろ David Flanagan
オライリージャパン
売り上げランキング: 13443

おすすめ度の平均:

基本書にふさわしい本
rubyマスターになるために
鬱にされる鬱然たるRuby教科書
For Rubist

Amazon.co.jp で詳細を見る

まつもとゆきひろコードの世界‾スーパー・プログラマになる14の思考法

posted with amazlet at 09.10.12

まつもとゆきひろ
日経BP出版センター
売り上げランキング: 40925

おすすめ度の平均:

Rubyに導入された思考法

Amazon.co.jp で詳細を見る

]]> [irc][lazy-people][ruby]

[perl]指定日から一ヶ月後までに指定した曜日が何個あるか求める

海賊たろ（小松大輔） — 2009-10-10T00:45:02+09:00

一ヶ月だとどの曜日も4回は必ずあるよね。29日以上ある月の場合に余った日の中に指定した曜日があれば ++ する。もっとスマートにかけるような気もする。そしてあってるのかどうかわからないw

use strict;
use warnings;
use utf8;
 
use Test::More qw/no_plan/;
use DateTime;
 
is count_wdays(7, 2009, 10, 10), 5;
is count_wdays(6, 2009, 10, 10), 5;
is count_wdays(6, 2009, 9, 13), 4;
is count_wdays(1, 2010, 1, 12), 4;
is count_wdays(3, 2010, 1, 12), 5;
is count_wdays(7, 2010, 2, 1), 4;
is count_wdays(3, 2010, 6, 11), 4;
 
sub count_wdays {
    my ( $wday, $year, $month, $day ) = @_;
 
    my $first = DateTime->new(year => $year, month => $month, day => $day);
    my $last = $first->clone->add( months => 1, end_of_month => 'limit' );
 
    # 指定日から一ヶ月後までの日数を求める
    my $dur = $last->delta_days($first);
    my $days = $dur->in_units('days');
 
    my $count = sprintf("%d", $days / 7);
    my $remainder = $days % 7;
 
    if ( $remainder ) {
        my $min = $last->subtract( days => $remainder )->wday;
        my $max = $min + $remainder;
        if ( $min <= $wday && $max >= $wday ) {
            $count++;
        }
    }
 
    return $count;
}

これで間違いなければ、たぶん引数増やして最終日指定できるようにしてもうまく計算できると思うんだけどどうだろ。

こういう CPAN モジュールありそうだけどわからなかった。

]]> [perl]

[oauth][perl]OAuth の署名付きリクエストを受け取る

海賊たろ（小松大輔） — 2009-09-17T00:10:53+09:00

OpenSocial で gadgets.io.makeReqeust() を受け付けとるときに OAuth の署名を確認したのでメモ。具体的に言うと mixi アプリで makeRequest() を受け取るとき。

perl で OAuth の署名確認には *::Lite の人のOAuth::Liteを使った。

mixi アプリのドキュメントにある公開鍵は、OAuth::Lite::SignatureMethod::RSA_SHA1 ではそのままだと使えなかったので public key だけ取り出しました。（Crypt::OpenSSL::RSA の new_public_key にそのまま渡されてるので）

openssl x509 -in mixi_rsa.pem -pubkey -noout

取り出した pub key を使って署名の確認。下記のコードは Catalyst のコントローラにべったり書いた。

use OAuth::Lite::SignatureMethod::RSA_SHA1;
use OAuth::Lite::Util qw(create_signature_base_string);
 
my $public_key = <<__END_OF_PUBLIC__;
-----BEGIN PUBLIC KEY-----
MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQDASPndWVBy/VYe99aVM/5PWVdS
D3Vb5uAlK4cAPz091V/1SOeL3YSRuOposPMDjf5TlQuUr/TmNE6cbAUFV0hLFQuB
69KmJN+Bt8JwptFbuFetNKaMVESntg69+VPeuvuqo2+Ob7dcTXnvNxTfdJcwga9f
W5Af9jh82kQTWmZf5QIDAQAB
-----END PUBLIC KEY-----
__END_OF_PUBLIC__
 
# mixi アプリは RSA_SHA1 方式
my $verifier = OAuth::Lite::SignatureMethod::RSA_SHA1->new(
    consumer_secret => $public_key,
);
 
my $params = $c->req->params;
 
# oauth sigunature も渡ってくるのでこれだけ取っておく。
my $oauth_signature = $params->{oauth_signature};
delete $params->{oauth_signature};
 
# HTTP Method, リクエストしてきた URI, oauth_signature 以外の parameter 全部を使って base_string 生成
my $base_string = create_signature_base_string($c->req->method, $c->uri_for(), $params );
 
# 真なら ok
my $result = $verifier->verify($base_string, $oauth_signature);

]]> [oauth][perl]

[yapc]YAPC::Asia2009 で話してきました

海賊たろ（小松大輔） — 2009-09-11T22:54:51+09:00

まずは、二日目のスピーチは到着が遅くなってご心配おかけしてすいませんでした。

今年は JPA 初の運営ということで、lestrrat さん、スタッフの皆さん、お疲れさまでした。
YAPC は、手を挙げて受理されればセッションをもらえるというのはわかっていましたが、なかなか手を挙げる勇気もなく、毎年聞く側として参加していました。
ですが、今年はコーポレートトラックがあったので YAPC で話す良いきっかけとなったと思います。「せっかくだったら一般参加でも話そう！」と踏み切れました。

私たちの Catalyst の使い方

自分が勤めている株式会社 Plugin and Core での Catalyst の使い方を紹介させていただきました。

Plucore way of using Catalyst

View more documents from Daisuke Komatsu.

Chaostrのソースコードはここです。

今日紹介した構成は、事例の中で紹介してるマンガ市場 DL が一番近いです。今はやっぱり $c->req, $c->session を渡すのをやめてしまってたりします。

ちなみにマンガ市場 DL の運営を行っているのはブックヴィレッジさんです。弊社は開発協力という形でリニューアルをお手伝いさせていただきました。
姉妹サイトの ToMiCo にも先日マンガ市場 DL との連携機能が付いたようです。

FormValidator::LazyWay で検証ルールをまとめよう

もう一つのセッションでは一般参加として、FormValidator::LazyWay を紹介させていただきました。

FormValidator::LazyWay で検証ルールをまとめよう

View more documents from Daisuke Komatsu.

話し終わった後に質問をいただいたりして本当にうれしかったです。そして返答がおどおどしててすいません。

今思い出すと、「自分でルールを作るのはどうしたら良いか」という質問で、「自分で作ったルールを読み込ませる方法」を答えていたような気がする orz

ルールの作り方は、後日 POD に掲載したいと思いますが、簡単に説明すると（ご質問いただいた方がここを見てるとは限らないんですが……）、OreOre::Rule::Hoge というルールクラスを作って、その中に入力内容を検証するメソッドを書きます。
この検証するメソッドは、入力内容が検証ルールに沿っていたら1, 沿っていなかったら0を返す用にします。

参考）Rule::Email

それから、設定で指定した言語での表記名を入れたモジュールが無いとエラーになってしまうので、OreOre::Rule::Hoge::JA などを作って、そのルールに従わなかったときのルールを表す文章を返すメソッドを用意してください。
「__field__には、__rule__が使用できます。」といったメッセージで __rule__ に当てはまる部分です。（__field__ は項目名が入ってきます）

参考）Rule::Email::JA

ちなみに発表の最後に多言語化の仕組みを変えたいと言ってたのはここの部分で、.po にしたいなぁと考えてたりします。

あと、このご質問で「いちいちコンフィグで読み込むルールモジュールを指定しておかないと行けないのも外したかったんだ、」というのを思い出しました。settings のとこに書いてあるルールモジュールを自動で読み込めばいいよね、と。

なんか早速パッチが届いたりしていて、YAPC::Asia で発表して良かったと思いました。
ほとんど blog とかで書いてなかったので、ユーザがいたとは自分でも驚きです。本当にありがとう！

自分のセッション以外では、自分以外のセッションを聞いたりしたのはもちろん、kansai.pm の人たちと再会したりいろんな人と話ができて楽しかったです。
来年も是非参加して、またなにか発表できたらいいなぁと思います。

お疲れさまでした−！

]]> [yapc]

[マンガ]青山景「ストロボライト」

海賊たろ（小松大輔） — 2009-09-08T00:29:59+09:00

表紙買いした。こういうカケアミとかで全体のトーンを表現した絵とか好きなのかも。

ストロボライト

posted with amazlet at 09.09.08

青山景
太田出版

おすすめ度の平均:

ボディブロウ。
甘く切ない、大二病

Amazon.co.jp で詳細を見る

ストーリーが良く練られてておもしろかったです。現在と過去を交錯させた演出とか好きなんだよね。その上、劇中に出てくる映画のシーンがも混じって出てきたりとかも良かったです。
ちょっとしたすれ違いが浮き彫りになっていく様子とかね。少し甘酸っぱい感じの青春ものでした。

なんにも考えないと面白かったとか楽しかったとか、小学生みたいな感想しか書けないですねw

]]> [マンガ]

[lazy-people][twitter]twitpacker で一気にフォローしましょう

海賊たろ（小松大輔） — 2009-09-07T21:49:11+09:00

どうもデザイナの vkgtaro です。
lazy people の twitter アプリ第3段です。ロゴとか作ったりちょこっとだけ手伝った。

このサービスは wiki ページみたいに twitter アカウントをまとめておけて、そのパッケージをフォローするボタンを押すと一気にフォローできるってな仕組みらしいです。

YAPC::Asia 2009 のスピーカーとかもまとまってますねー。

OpenID 対応もされて、twitter OAuth による認証以外でも編集できるようになったみたいです。

詳しいことはWiki的なTwitter Followeeレコメンドサービス、「Twitpacker」にまとまってます。

]]> [lazy-people][twitter]

[perl][yapc]再度告知: YAPC::Asia Tokyo 2009 で「Catalyst」と「FormValidator::LazyWay」について話します！

海賊たろ（小松大輔） — 2009-09-07T21:31:46+09:00

もう今週ですよ！やばい！

YAPC::Asia Tokyo 2009 で自分たちの Catalyst の使い方についてと、僕が開発のお手伝いとメンテをしている FormValidator::LazyWay について話します！

2009/09/10 14:50 Six Apart 講堂: プラコアでは Catalyst をこう使ってます！ / Plucore way of using Catayst
2009/09/11 09:45 西5号館: FormValidator::LazyWay で検証ルールをまとめよう

正直、段々と逃げたくなってまいりました！
昨日ちょっと練習してみたところ、おおよそ 20 分にはおさまってますというか、本番は緊張して早口になって15分くらいで終わったらどうしようとか、もう少し資料修正しようかなぁとか、LazyWay もう少し手直ししておけば良かったとか考えつつ、週末は風呂掃除でカビキラーまきすぎて気分悪くなったりしてました。

YAPC のチケットはもう追加販売分も売り切れたのかしら？　その後の特別研修は参加したいけどこれ以上休めないのよね >_<

あと前夜祭の yokohama.pm も行けそうにない orz

YAPC::Asia Tokyo×gihyo.jp presents―まもなく開催！アジア最大のPerl開発者の祭典，YAPC::Asia Tokyo 2009

各トラックの紹介記事へのリンク。

]]> [perl][yapc]

[livedoor][mt][wiki]MovableType で Text::Livedoor::Wiki 記法

海賊たろ（小松大輔） — 2009-08-26T00:35:47+09:00

先日、polocky さんによって Text::Livedoor::Wiki がリリースされてますね。（livedoor wiki の中の人ですよね？って wiki に思いっきり書いてあったw）

全部の記法が plugin として書かれてて、その気になれば自分記法も作れそうな本気実装です。
自身の blog ではてな記法を livedoor 記法に含めると行ったネタも披露されてますねw

結構 Moose の話題とか書かれてたので、ひっそり読んでたところへの記法モジュール公開だったので、これを機会になにかトラックバック送るネタでもないかなぁと思って作ってみました。

mt の plugins ディレクトリ以下に TextLivedoorWiki ってディレクトリ作って TextLivedoorWiki.pl ってファイル名で突っ込んでおくと記事書くときのフォーマット欄に出てくると思います。

Text::Livedoor::Wiki の引数に渡してる storage は各々、CSS とか画像をダウンロードして、自分の URI に変えてください。（POD にも書いてありました）

MTOS-4.261-ja で確認しました。（ちなみにこの blog はまだ 3 系だったりする。MTOS にしたいけど、妙なカスタマイズしてしまってるのがアレです。）

MT の plugin はこんな書き方でよかったのかもちょっと自信ないけど動いてるのでよしとする polocky さん応援エントリw
（そして wiki ユーザとしては不良ユーザです、すいませんw）

]]> [livedoor][mt][wiki]