Catalyst で DB への commit / rollback のためにこんなコードを書いていて…… package MyWebApp; # 略 sub finalize { my $c = shift; my $r = $c->NEXT::finalize(@_); if (正常終了) { $dbh->commit; } else { $dbh->rollback; } return $r; } 他の finali…

以下 2点。ちょいと困ったので調べた。 1. Daemon::Generic で書いた daemon を cron から起動するとゾンビが残る件 2. logger 経由で表示されるログの pid が、自分のじゃない件まず、プロセスを daemon 化する処理について。 Unix Programming Frequently …

decoded_content が欲しかったので $res = URI::Fetch->fetch( $uri, Cache => $cache ); $res->http_response->decoded_content; ってしたのだが、Cache にヒットすると http_response が空っぽ。 Cache に書き込む部分は以下のようになっていて、http_resp…

分散ストレージシステム Cagra が面白そうだなあと思いつつ以下の図を見たら、 これ、Spread Toolkit でセッションレプリケーション - 酒日記 はてな支店 で書いた図に似ているなと。 要するに、client は localhost(でなくてもいいけど) の daemon と通信し…