unknownplace.org

貸してもらった！

やべー、こんなむずかったっけ。Bダッシュむずい。

Time Tracker 良いね。

これ社内用に共有というか他人の見えるやつ作ったら楽しそうだ。

ちょっと前に audioleaf のトップになってて知ったんだけど、なかなかかっちょよい。

公式サイトがアレなのがあれ。

Bloglines にもう補足されてる。はや。。

tokuhiro のひとから要望パッチきてたので適用。サンクス！

1. screen導入したて、画面ロールバックできなくてこまる
2. コピーモードを覚える、が使いにくいと思う
3. PuTTY の Alternate 端末画面への切り替えを無効にするのオプションを知る。便利ジャン！
4. 徐々にコピーモードしか使わなくなる。
5. スクロールバーが邪魔になり、スクロールバーを表示しなくなり、コピーモードのみになる。(←いまここ

この後どうなるんでしょうか。

CPAN の Recent RSS は更新チェックにはつかえるけど、名前空間で絞りこみたかったり、何が変わったのか知りたいので、更新された部分の Changelog つきで RSS をはくツールを作ってみた。

CPAN Recent Changes

/cpanrecent/Catalyst/Plugin

などとすれば Catalyst::Plugin のみの更新もチェック可能。CPAN ウォーチャー必携！

ソースはこちら： http://svn.unknownplace.org/public/CPANRecent/trunk/

はてなブックマーク - Catalyst::Plugin::Flavour

hatena タグ？

起きた。

昨日仕事納め→忘年会→二次会→つぶれた人と漫喫で休憩→帰還→寝

ここみたいに Path が /2005/12/27 とかからはじまっていた場合、それを日付情報としてパースし、それ以降の Path とともに default コントローラを呼ぶには

sub day : Regex('^(\d{4})/([01]?\d)/([0-3]?\d)(?:/(.*))?') {
    my ( $self, $c ) = @_;

    ( $c->stash->{yr}, $c->stash->{mo}, $c->stash->{da} )
        = @{ $c->req->snippets };
    $c->forward( '/default', [ split '/', $c->req->snippets->[-1] ] );
}

sub month : Regex('^(\d{4})/([01]?\d)(?:/(.*))?') {
    my ( $self, $c ) = @_;

    ( $c->stash->{yr}, $c->stash->{mo} ) = @{ $c->req->snippets };
    $c->forward( '/default', [ split '/', $c->req->snippets->[-1] ] );
}

sub year : Regex('^(\d{4})(?:/(.*))?') {
    my ( $self, $c ) = @_;

    ( $c->stash->{yr} ) = @{ $c->req->snippets };
    $c->forward( '/default', [ split '/', $c->req->snippets->[-1] ] );
}

とかしなくちゃいけなくて(思い付かなくて) DRY すぎるのでなんとかしたい。

がんばればまとめられそうだけど、ううむ。

つか関係ないけど Regex コントローラはマッチした部分がコントローラの引数で飛んでくるって感じならいいのに。