unknownplace.org

なんか似てるよね。

mutt 使いは irssi も気に入る説。

こんな感じ。普通にIRCっぽくなる。

安定してるから nick に @ つけるのはオプションにしてほかのクライアントでもつかえるようにしようかなぁ。

実体参照になったりならなかったり。一時的なものかと思ってたけどずっと直らんな。

del.icio.us がわるいのか Bloglines API がわるいのかわからんけど。そろそろなんかするか。

作った！

空前の Twitter - IRC ゲートウェイ作成ブーム。

ソースこの辺です。ライセンスは GPLv2。(たぶん。PoCo::Jabberのせいです。)

http://svn.unknownplace.org/public/scratch/Twirc/

これの特徴は

• Jabber 使ってるのでリアルタイム性が高い
• nick に @ つけているのでクライアントによってはバグる

などです。

二個目は LimeChat でおかしくなることを確認。

まー僕の使ってる irssi で動けばいいのです。

irssi は nick の補完ができるので、@ をつけておけばいい感じで twitter 形式のレスができるってわけです。

使い方

1. svn co
2. yaml いじる (jabberアカウントと、IRCのポートとIRCクライアントの文字コード)
3. ./script/twirc.pl
4. IRCクライアントでつないで #twitter に join

あと、2で設定するjabber(or gtalk)アカウントはあらかじめtwitterで使えるように設定しておく必要があります。

おお、1.4.15。

Log::Dispatch は大好きなモジュールのひとつなんだけど、これだけだとイマイチ微妙。

Log::Dispatch::Config を使うことですげーー便利になる。必須。

miyagawa さんは 5 年以上も前にこれ作ったんだなぁ。

同僚から聞かれたので、僕のやり方を書いておく。

すでにCPANに Catalyst::Plugin::Log::Dispatch というのがあるのだけど、なんかいけてないのでそれは使わず、以下のようにしている。

まず MyApp::Logger とかいうのをかく

package MyApp::Logger;
use strict;
use warnings;

use Log::Dispatch::Config;
use Log::Dispatch::Configurator::YAML;

use Catalyst::Utils;
use NEXT;

{
    package MyApp::Logger::Backend;
    use base qw/Log::Dispatch::Config/;
}

sub setup {
    my $c      = shift;
    my $class  = ref $c || $c;

    $c->log->_flush if $c->log->can('_flush');

    my $config = $c->config->{log}{config}
        || $c->path_to( Catalyst::Utils::appprefix($class) . '_log.yml' );

    MyApp::Logger::Backend->configure_and_watch(
        Log::Dispatch::Configurator::YAML->new($config) );
    $class->log( MyApp::Logger::Backend->instance );

    $c->NEXT::setup(@_);
}

1;

んでこれをプラグインとしてロード。

use Catalyst qw/+MyApp::Logger/;

ログの設定ファイルを書く(デフォルトmyapp_log.yml)

---
dispatchers:
  - file
  - screen

file:
  class: Log::Dispatch::File
  min_level: debug
  filename: /path/to/log
  mode: append
  format: '[%d] [%p] %m at %F line %L%n'

screen:
  class: Log::Dispatch::Screen
  min_level: debug
  stderr: 1
  format: '[%p] %m%n'

以上。

MyApp::Logger::Backend とかしてるのは mod_perl 対策。まーつかわんのだけど。

これ、さっきヘルパーにした。

Catalyst-Helper-Log-Dispatch

これ使えば

./script/myapp_create.pl Log::Dispatch

すると Logger クラスとサンプルの yml ファイルを生成してくれる。

friend登録されたののメール通知がくるときと来ないときがあるなぁ。

junk行きになってるかと思いきやそうでもないようだ。

サンデーマガジン立ち読みにいつものコンビニに寄ったらなぜかオリオンビールが！！

すきなんだよなー。

酒かうつもりなかったのに、なんだよもう。

putty tray のサイト、さり気におもしろい。

アイコンドラッグでダウンロードとか。