<h3>久しぶりにARのmodel</h3>
<p>find_or_create_by_name すげー便利！うんこ！</p>
<h3>plaggerのコミット権欲しい！</h3>
<p>と書くともれなくコミット権がもらえるかも？</p>
<p>追記:もらえました。</p>
<h3>matchpairs</h3>
<p><a href="http://d.hatena.ne.jp/motemen/20060301/1141226297">http://d.hatena.ne.jp/motemen/20060301/1141226297</a></p>
<p>おー。いつの間に。スバラシス。いまのvim7じゃ使えなかったのでcvs upしてコンパイルしたら使えるようになった。最近vim7のnew-* 追いかけてないなぁ。</p>
<h3>CSS Properties To JavaScript Reference Conversion</h3>
<p><a href="http://codepunk.hardwar.org.uk/css2js.htm">http://codepunk.hardwar.org.uk/css2js.htm</a></p>
<p>なんかやたら人気だけど</p>
<pre><code>'border-top-width'.gsub(/-(\w)/){ $1.upcase }
# borderTopWidth
</code></pre>
<p>でほとんどできるんだよね。でも</p>
<pre><code>text-decoration: none
</code></pre>
<p>とかを</p>
<pre><code>textDecorationNone
</code></pre>
<p>で書けるのはしらん買った。</p>
<h3>perlをぜんぜんわかってないな、と思うとき</h3>
<p>shiftとか文字列展開あたりがまだ全然。正規表現のオプションについてはmoeiぐらいしかぱっと解らない。</p>
<pre><code>"$foo->{bar}"
</code></pre>
<p>で展開できる(と思う)けどイマイチ解らなくて</p>
<pre><code>"{$foo->{bar}}"
</code></pre>
<p>みたいにブレースでとりあえず囲ったり</p>
<pre><code>my $socket_options = {
        PeerAddr => $host,
        PeerPort => 9801,
        Proto    => 'tcp',
        shift || {},
    };
</code></pre>
<p>って書けるのに</p>
<pre><code>my $options = shift || {};
    my $socket_options = {
        PeerAddr => $host,
        PeerPort => 9801,
        Proto    => 'tcp',
        %$options,
    };
</code></pre>
<p>と書いたり。</p>

久しぶりにARのmodelfind_or_create_by_name すげー便利！うんこ！plaggerのコミット権欲しい！と書くともれなくコミット権がもらえるかも？追記:もらえました。matchpairshttp://d.hatena.ne.jp/motemen/20060301/1141226297おー。いつの間に。スバラシス。いまのvim7じゃ使えなかったのでcvs upしてコンパイルしたら使えるようになった。最近vim7のnew-* 追いかけてないなぁ。CSS Properties To JavaScript Reference Conversionhttp://codepunk.hardwar.org.uk/css2js.htmなんかやたら人気だけど'border-top-width'.gsub(/-(\w)/){ $1.upcase }
# borderTopWidthでほと

久しぶりにARのmodelfind_or_create_by_name すげー便利！うんこ！plaggerのコミット権欲しい！と書くともれなくコミット権がもらえるかも？追記:もらえました。matchpairshttp://d.hatena.ne.jp/motemen/20060301/1141226297おー。いつの間に。スバラシス。いまのvim7じゃ使えなかったのでcvs upしてコンパイルしたら使えるようになった。最近vim7のnew-* 追いかけてないなぁ。CSS Properties To JavaScript Reference Conversionhttp://codepunk.hardwar.org.uk/css2js.htmなんかやたら人気だけど'border-top-width'.gsub(/-(\w)/){ $1.upcase }
# borderTopWidthでほとんどできるんだよね。でもtext-decoration: noneとかをtextDecorationNoneで書けるのはしらん買った。perlをぜんぜんわかってないな、と思うときshiftとか文字列展開あたりがまだ全然。正規表現のオプションについてはmoeiぐらいしかぱっと解らない。"$foo->{bar}"で展開できる(と思う)けどイマイチ解らなくて"{$foo->{bar}}"みたいにブレースでとりあえず囲ったりmy $socket_options = {
        PeerAddr => $host,
        PeerPort => 9801,
        Proto    => 'tcp',
        shift || {},
    };って書けるのにmy $options = shift || {};
    my $socket_options = {
        PeerAddr => $host,
        PeerPort => 9801,
        Proto    => 'tcp',
        %$options,
    };と書いたり。

2006-03-03

<h3>Plagger::Plugin::Publish::SSTP</h3>
<p>ぽっくんオタなの＞＜ノ</p>
<p>エンコード周りが全然わからない･･･。</p>
<p>Plagger::Plugin::Publish::SSTP</p>
<pre><code>package Plagger::Plugin::Publish::SSTP;
use strict;
use base qw( Plagger::Plugin );

our $VERSION = '0.0.1';

sub register {
    my($self, $context) = @_;
    $context->register_hook(
        $self,
        'publish.feed' => \&#x26;feed,
    );
}

sub feed {
    my($self, $context, $args) = @_;
    my $feed = $args->{feed};
    my $title = $feed->title || '(no-title)';

    my @messages = $title;
    for my $entry ($args->{feed}->entries) {
        push @messages, $self->templatize($context, $entry);
    }
    my $message = join '\x', @messages;
    $context->log(debug => $message);

    my $sstp = Plagger::Plugin::Publish::SSTP::Send->new(
        $self->conf->{host} || 'localhost'
    );
    my $result = $sstp->send($message);
    $context->log(debug => $result);
}

sub templatize {
    my($self, $context, $entry) = @_;
    my $tt = $context->template();
    $tt->process('sstp.tt', {
        entry => $entry,
    }, \my $out) or $context->error($tt->error);
    $out;
}

1;

package Plagger::Plugin::Publish::SSTP::Send;
use strict;
use IO::Socket::INET;
use Encode;

our $VERSION = '0.0.1';

our $SEND = 'SEND SSTP/1.4';
our $SENDER = 'Plagger::Plugin::Publish::SSTP::Send';
our $BREAK = "\r\n";

sub new {
    my $class = shift;
    my $host = shift || 'localhost';
    my $options = shift || {};
    my $socket_options = {
        PeerAddr => $host,
        PeerPort => 9801,
        Proto    => 'tcp',
        %$options,
    };
    bless {
        socket_options => $socket_options,
    }, $class;
}

sub socket {
    my $self = shift;
    IO::Socket::INET->new(%{$self->{socket_options}});
}

sub send {
    my $self = shift;
    my $str = shift;
    $str =~ s/\r?\n/\\n/go;
    utf8::decode($str) unless utf8::is_utf8($str);
    utf8::encode($str);

    $str .= "\\e";
    my $options = shift || {};
    my $send = {
        Sender => $SENDER,
        Script => $str,
        Charset => 'UTF-8',
        %$options,
    };
    my @result = $SEND;
    push @result, map {"$_: $send->{$_}"} keys %$send;
    push @result, '', '';
    my $result = join $BREAK, @result;
    my $socket = $self->socket;
    print $socket $result;
    $socket->flush;

    &#x3C;$socket>;
}

1;
</code></pre>
<p>sstp.tt</p>
<pre><code>[% entry.title || '(no-title)' %]
[% IF entry.author %] by [% entry.author %] [% END %]
[% entry.permalink %]
</code></pre>
<p>config.yaml</p>
<pre><code>- module: Publish::SSTP
    config:
      host: 192.168.0.10
</code></pre>
<p><a href="http://www.flickr.com/photos/gorou/106781235/" title="Photo Sharing"><img src="http://static.flickr.com/44/106781235_5ea059b33f_o.png" alt="sstp"></a></p>

Plagger::Plugin::Publish::SSTPぽっくんオタなの＞＜ノエンコード周りが全然わからない･･･。Plagger::Plugin::Publish::SSTPpackage Plagger::Plugin::Publish::SSTP;
use strict;
use base qw( Plagger::Plugin );

our $VERSION = '0.0.1';

sub register {
    my($self, $context) = @_;
    $context->register_hook(
        $self,
        'publish.feed' => \&feed,
    );
}

sub feed {
    my($self, $context, $args) = @_;
    my $feed = $arg

Plagger::Plugin::Publish::SSTPぽっくんオタなの＞＜ノエンコード周りが全然わからない･･･。Plagger::Plugin::Publish::SSTPpackage Plagger::Plugin::Publish::SSTP;
use strict;
use base qw( Plagger::Plugin );

our $VERSION = '0.0.1';

sub register {
    my($self, $context) = @_;
    $context->register_hook(
        $self,
        'publish.feed' => \&feed,
    );
}

sub feed {
    my($self, $context, $args) = @_;
    my $feed = $args->{feed};
    my $title = $feed->title || '(no-title)';

    my @messages = $title;
    for my $entry ($args->{feed}->entries) {
        push @messages, $self->templatize($context, $entry);
    }
    my $message = join '\x', @messages;
    $context->log(debug => $message);

    my $sstp = Plagger::Plugin::Publish::SSTP::Send->new(
        $self->conf->{host} || 'localhost'
    );
    my $result = $sstp->send($message);
    $context->log(debug => $result);
}

sub templatize {
    my($self, $context, $entry) = @_;
    my $tt = $context->template();
    $tt->process('sstp.tt', {
        entry => $entry,
    }, \my $out) or $context->error($tt->error);
    $out;
}

1;

package Plagger::Plugin::Publish::SSTP::Send;
use strict;
use IO::Socket::INET;
use Encode;

our $VERSION = '0.0.1';

our $SEND = 'SEND SSTP/1.4';
our $SENDER = 'Plagger::Plugin::Publish::SSTP::Send';
our $BREAK = "\r\n";

sub new {
    my $class = shift;
    my $host = shift || 'localhost';
    my $options = shift || {};
    my $socket_options = {
        PeerAddr => $host,
        PeerPort => 9801,
        Proto    => 'tcp',
        %$options,
    };
    bless {
        socket_options => $socket_options,
    }, $class;
}

sub socket {
    my $self = shift;
    IO::Socket::INET->new(%{$self->{socket_options}});
}

sub send {
    my $self = shift;
    my $str = shift;
    $str =~ s/\r?\n/\\n/go;
    utf8::decode($str) unless utf8::is_utf8($str);
    utf8::encode($str);

    $str .= "\\e";
    my $options = shift || {};
    my $send = {
        Sender => $SENDER,
        Script => $str,
        Charset => 'UTF-8',
        %$options,
    };
    my @result = $SEND;
    push @result, map {"$_: $send->{$_}"} keys %$send;
    push @result, '', '';
    my $result = join $BREAK, @result;
    my $socket = $self->socket;
    print $socket $result;
    $socket->flush;

    ;
}

1;sstp.tt[% entry.title || '(no-title)' %]
[% IF entry.author %] by [% entry.author %] [% END %]
[% entry.permalink %]config.yaml- module: Publish::SSTP
    config:
      host: 192.168.0.10Photo Sharing

Plagger::Plugin::Publish::SSTP

<h3>HHKPよりThinkpadのキーボードの方が</h3>
<p>打ちやすくなってきた。たぶん慣れ。あと窓鬱でwindowsキーとか使えるようにカスタマイズしてるのもでかい＞thinkpad。最近はThinkpad >> HHK2 >>>> HHKP ぐらいな打ち心地かも。</p>
<h3>お風呂入れたと思ったら水入れてた</h3>
<p>だいぶ時間経ってもピーって鳴らない(お湯が一定リットル出ると鳴る)と思って見に行ったら水があふれてた…。お風呂すぐに入りたいのに。水もったいない。水代もったいない。。かなりしにたいきぶんです。</p>
<h3>Plagger recipeがあったらいいなぁ。</h3>
<p>Plaggerを使い込んでいくと用途ごとに複数のconfigを用意することになる(よね？)。でもglobalは共通だし、pluginsのいくつかの部分も共通。でもそれをコピペでconfigつくってくにはDRYじゃない。</p>
<p>そこでこんな感じにpluginsで読み込むプラグインに名前をつけて、実際の実行はrecipesに記載する。</p>
<p>recipesのcustum_feedsじゃmixiやfrepaからfeedを取り込んで、gmailにメール送るのとlocalhostのSSTPサーバに通信。uptimeのほうはCustomFeed::Pipeの実行結果をgmaiにメール送ってlocalhostと知り合いのSSTPサーバに通信。configをわけるとgmailの部分とsstp_localhostを部分をコピペらないとダメだけどこれなら一つですむ。</p>
<pre><code>global:
  plugin_path:
    - /home/gorou/svn/plagger/plugins
  timezone: Asia/Tokyo
  log:
    level: debug

plugins:
  sstp_localhost:
    module: Notify::SSTP
    config:
      host: localhost
  sstp_friend:
    module: Notify::SSTP
    config:
      host: 192.168.0.10
  pipe_uptime:
    module: CustomFeed::Pipe
    config:
      command: /usr/bin/uptime
  mixi:
    module: CustomFeed::Mixi
    config:
      email: foo@example.com
      password: xxxxxxxx
      fetch_body: 1
      show_icon: 1
  frepa:
    module: CustomFeed::Frepa
    config:
      livedoor_id: your-id
      password: password
      fetch_body: 1
      show_icon: 1
  gmail:
    module: Publish::Gmail
    config:
      mailto: example@gmail.com
      mailfrom: xxx@example.com
      mailroute:
        via: smtp
        host: localhost

recipes:
  custum_feeds:
    - mixi
    - frepa
    - sstp_localhost
    - gmail
  uptime:
    - pipe_uptime
    - sstp_localhost
    - sstp_friend
    - gmail
</code></pre>
<p>もしくはcronでとある処理は5分間隔、とある処理は30分とか指定したい時のためにconfig.base.yamlに基本のglobalやpluginsを書いておいて</p>
<p>config.feeds.yaml</p>
<pre><code>includes: 
  - config.base.yaml
recipes:
  custum_feeds:
     - mixi
     - frepa
     - sstp_localhost
     - gmail
</code></pre>
<p>config.uptime.yaml</p>
<pre><code>includes: 
  - config.base.yaml
recipes:
  uptime:
     - pipe_uptime
     - sstp_localhost
     - sstp_friend
     - gmail
</code></pre>
<p>とか書けるとうれしいなぁ。ぺるるが綺麗に書ければ実装してみるんだけどなぁ。。</p>
<p>追記:miyagawaさんが三日前にすでにincludeのticket切ってたよ！</p>
<p><a href="http://plagger.org/trac/ticket/83">http://plagger.org/trac/ticket/83</a></p>
<h3>ppの出力結果の文字列での取得</h3>
<p>前にも書いたけどもう一度メモ書き。</p>
<p>pはobj.inspectでとれるけど、ppはPP.pp(obj, '')るのが一番楽なのかな。obj.pp_inspect とかあればいいのに。</p>
<h3>DualDisplay</h3>
<p><a href="http://www.flickr.com/photos/gorou/107410869/" title="Photo Sharing"><img src="http://static.flickr.com/40/107410869_2f24f118cb_m.jpg" alt="Dual Display"></a></p>
<p>家でPCさわってる時間が少なくなってきたので持ってきた。2407FPWが出たら家もDualに戻る予定。</p>
<h3>3x3</h3>
<p><a href="http://www.amazon.co.jp/exec/obidos/ASIN/B000CQLZVU/hatena-hamazou-22/"><img src="https://images-fe.ssl-images-amazon.com/images/I/31XF0ZRYMHL._SL160_.jpg" alt="3×3" title="3×3"></a></p>
<p><a href="http://www.amazon.co.jp/exec/obidos/ASIN/B000CQLZVU/hatena-hamazou-22/">3×3</a></p>
<ul>
<li>アーティスト: NONA REEVES,NONA REEVES feat.宇多丸,西寺郷太,いしわたり淳治,スティーヴィー・ワンダー,佐々木士郎,HIROYASU YANO</li>
<li>出版社/メーカー: 徳間ジャパンコミュニケーションズ</li>
<li>発売日: 2006/02/22</li>
<li>メディア: CD</li>
<li>クリック: 22回</li>
<li><a href="http://d.hatena.ne.jp/asin/B000CQLZVU">この商品を含むブログ (91件) を見る</a></li>
</ul>
<p>ちょうさいこう！ってわけじゃないけどかなりイイ。透明ガールはやっぱ名曲すぎるなぁ。</p>

HHKPよりThinkpadのキーボードの方が打ちやすくなってきた。たぶん慣れ。あと窓鬱でwindowsキーとか使えるようにカスタマイズしてるのもでかい＞thinkpad。最近はThinkpad >> HHK2 >>>> HHKP ぐらいな打ち心地かも。お風呂入れたと思ったら水入れてただいぶ時間経ってもピーって鳴らない(お湯が一定リットル出ると鳴る)と思って見に行ったら水があふれてた…。お風呂すぐに入りたいのに。水もったいない。水代もったいない。。かなりしにたいきぶんです。Plagger recipeがあったらいいなぁ。Plaggerを使い込んでいくと用途ごとに複数のconfigを用意することになる(よね？)。でもglobalは共通だし、pluginsのいくつかの部分も共通。でもそれをコピペでconfigつくってくにはDRYじゃない。そこでこんな感じにpluginsで読み込むプラグインに名

HHKPよりThinkpadのキーボードの方が打ちやすくなってきた。たぶん慣れ。あと窓鬱でwindowsキーとか使えるようにカスタマイズしてるのもでかい＞thinkpad。最近はThinkpad >> HHK2 >>>> HHKP ぐらいな打ち心地かも。お風呂入れたと思ったら水入れてただいぶ時間経ってもピーって鳴らない(お湯が一定リットル出ると鳴る)と思って見に行ったら水があふれてた…。お風呂すぐに入りたいのに。水もったいない。水代もったいない。。かなりしにたいきぶんです。Plagger recipeがあったらいいなぁ。Plaggerを使い込んでいくと用途ごとに複数のconfigを用意することになる(よね？)。でもglobalは共通だし、pluginsのいくつかの部分も共通。でもそれをコピペでconfigつくってくにはDRYじゃない。そこでこんな感じにpluginsで読み込むプラグインに名前をつけて、実際の実行はrecipesに記載する。recipesのcustum_feedsじゃmixiやfrepaからfeedを取り込んで、gmailにメール送るのとlocalhostのSSTPサーバに通信。uptimeのほうはCustomFeed::Pipeの実行結果をgmaiにメール送ってlocalhostと知り合いのSSTPサーバに通信。configをわけるとgmailの部分とsstp_localhostを部分をコピペらないとダメだけどこれなら一つですむ。global:
  plugin_path:
    - /home/gorou/svn/plagger/plugins
  timezone: Asia/Tokyo
  log:
    level: debug

plugins:
  sstp_localhost:
    module: Notify::SSTP
    config:
      host: localhost
  sstp_friend:
    module: Notify::SSTP
    config:
      host: 192.168.0.10
  pipe_uptime:
    module: CustomFeed::Pipe
    config:
      command: /usr/bin/uptime
  mixi:
    module: CustomFeed::Mixi
    config:
      email: foo@example.com
      password: xxxxxxxx
      fetch_body: 1
      show_icon: 1
  frepa:
    module: CustomFeed::Frepa
    config:
      livedoor_id: your-id
      password: password
      fetch_body: 1
      show_icon: 1
  gmail:
    module: Publish::Gmail
    config:
      mailto: example@gmail.com
      mailfrom: xxx@example.com
      mailroute:
        via: smtp
        host: localhost

recipes:
  custum_feeds:
    - mixi
    - frepa
    - sstp_localhost
    - gmail
  uptime:
    - pipe_uptime
    - sstp_localhost
    - sstp_friend
    - gmailもしくはcronでとある処理は5分間隔、とある処理は30分とか指定したい時のためにconfig.base.yamlに基本のglobalやpluginsを書いておいてconfig.feeds.yamlincludes: 
  - config.base.yaml
recipes:
  custum_feeds:
     - mixi
     - frepa
     - sstp_localhost
     - gmailconfig.uptime.yamlincludes: 
  - config.base.yaml
recipes:
  uptime:
     - pipe_uptime
     - sstp_localhost
     - sstp_friend
     - gmailとか書けるとうれしいなぁ。ぺるるが綺麗に書ければ実装してみるんだけどなぁ。。追記:miyagawaさんが三日前にすでにincludeのticket切ってたよ！http://plagger.org/trac/ticket/83ppの出力結果の文字列での取得前にも書いたけどもう一度メモ書き。pはobj.inspectでとれるけど、ppはPP.pp(obj, '')るのが一番楽なのかな。obj.pp_inspect とかあればいいのに。DualDisplayPhoto Sharing家でPCさわってる時間が少なくなってきたので持ってきた。2407FPWが出たら家もDualに戻る予定。3x33×33×3アーティスト: NONA REEVES,NONA REEVES feat.宇多丸,西寺郷太,いしわたり淳治,スティーヴィー・ワンダー,佐々木士郎,HIROYASU YANO出版社/メーカー: 徳間ジャパンコミュニケーションズ発売日: 2006/02/22メディア: CDクリック: 22回この商品を含むブログ (91件) を見るちょうさいこう！ってわけじゃないけどかなりイイ。透明ガールはやっぱ名曲すぎるなぁ。

A Day in the Life

2006-03-03

久しぶりにARのmodel

plaggerのコミット権欲しい！

matchpairs

CSS Properties To JavaScript Reference Conversion

perlをぜんぜんわかってないな、と思うとき

書いている人

おたよりを送る