[ This is yet another DarkPAN manager. It is highly depended for cpanm. I don't think about relat

[ Python 系のイベントにでるのは久々ですね。昔は Python のイベントで登壇してたりもしていた私ですが、最近はすっかり「Perl のスパイだ!」と後ろ指をさされがちですね。 今回は P

[ hmm... This looks just a monkey patch project. It is very dirty, but works. This module does not

conditions precedent: * use daemontools & multilog Points: * make DB connection after fork * do n

[ just fucking do { } it. ``` use 5.10.1; my $year = 2010; my $month = 11; my $nendo = do {

use Data::Rmap! ``` use Data::Rmap ':all'; use HTML::Entities qw/encode_entities_numeric/; my $foo

> にしても、こちらのサイトでも言われていますが、なぜ半角カナ専用のUnicodeブロックがないのかと小一時間（ｒｙ [ [ ということで、 ``` sub InHankakuKatakan

Plack::Middleware::StackTrace displays last exception information since the code is: ``` my $tr

I'm using Smart::Args these days, but some people say "Smart::Args is too smart.". I suggest yet an

[ Teleport is awesome tool to share keyboard & mouse between two macs. The good points of Teleport

``` my $row = $db->insert($args); pre_insert: ($db, $args, $table_name) post_insert: ($db,

``` autocmd BufRead *.sql set filetype=mysql ``` Vim7 applies oracle sql syntax by default. But you

``` use Email::Sender::Simple qw/sendmail/; sendmail(@args); ``` is same as ``` use Email::Sender:

HTTP/1.1 においては、HEAD リクエストの場合には **Message Body を送信してはならない**ということにはなっているのですが、現実的には、Message Body をおくりかえ

I will use Net::SSL(in Crypt-SSLeay distribution) for Furl. ``` 17:41 tokuhirom: perl で ssl するときって

larry wall さん, obra さん, miyagawa さんという3人の豪華なメインスピーカー、東工大の綺麗で広い会場、そしてよい天気にめぐまれ、今年の YAPC も無事におわりましたね!

[ CPAN モジュールのアップロードは ShipIt をつかうと楽なことがしられていますが、CPAN にあげたくないモジュールなどのアップロード場所としては、リポジトリに github をつかって

* HEAD をよぶときは CURLOPT\_NOBODY をつけないとささる * CURLOPT\_HEADERFUNCTION はとても遅いのでできるだけ curl\_getinfo() をつかう

[ KyotoTycoon の Perl 用クライアントライブラリをだしました。 * straight forward * simple * less dependencies * stabili

[ ドコモ絵文字をテンプレにかいたら3キャリ分表示できるようにするためのライブラリ。とりあえず !emoji:1( による &#xXXXX; の2形式に対応している。3キャリで 3G ならちゃんとみ

[ Xslate + Email::Simple で MIME::Lite::TT::Japanese っぽいあるいは MoFedge::Mailer っぽいやつがほしいなーとおもったので、つくった

PHP5をPerl5からよべるということでためそうとしたが、うまくうごかなかった。 とりあえず aptitude install php5-cli php5-dev したのだが、コンパイルがとおらな

benchmark script is: result is: #### conclusion RPC::XML is pretty fast.

以下のように RPC::XML をつかうとよい。 Following code is XMLRPC server snippet on Plack. This code uses RPC::XML

テストが最新の RPC::XML でこける問題を修正して shipped. 問題は RPC-XML-Parser-XS からもってきたテストケースが xmlrpc spec 的に invalid

【追記 2010-09-27】 HTML::Tree にバグをみつけたので、パッチをおくりました、それがリリースされるまでの間は HTML::Tree 4.0 はつかわない方がいいです。 ---

[ まあこんなかんじで。

``` requires 'GIS::Distance::Lite'; requires 'HTML::MobileJp'; requires 'Geo::Coordinates::Converter

* [ * [ * [ こんなところか。

* bug fix(gfx, tokuhirom) * performance tuning(gfx) * PP support(makamaka) といったところがもろもろはいって 0.26 まで

[ IRC にポストするスクリプトを書く場合に、常駐させないようにつくると JOIN/PART メッセージがいちいち表示されてうざいという問題がよく知られており、これにたいする対策として、常駐プロセ

[ ``` my $c = MyApp->bootstrap(); print make_schema_at('MyApp::DB', {}, $c->config->{'DB'}); ``` み

Test::Valgrind is a perl wrapper for valgrind(1). T::V helps to find invalid memory operation. You

threads::shared uses magic. But so, it is not restore after Storable::thaw. ``` use strict; use war

[ Perl5 において有名な画像処理ライブラリといえば GraphicsMaick, ImageMagick, Imager, Imlib2, GD あたりだとおもうのだが、はたしてアバターのレ

perl5.13.4 以後では STATIC\_INLINE というマクロが定義されるようになっており、これをつかうと便利だと gfx がいっていたので最近つかっていたりする。 で、互換性のためによ

Params::Validate のつかいかたがまちがってて parameter の validation がきいてなかったんでなおしました。

[ [ Kan Fushihara organize drinking party after YAPC::Asia 2010. Join us! If you cannot understa

``` 0.18 - added accessor: Text::MicroTemplate::File->include_path ``` T::MT::File->include\_path

[ ``` $ perl -d:bt -MB -e'(bless \(my $o = 0), q{B::SV})->REFCNT' #0 0x00007f9c3215ab0e in

``` use strict; use warnings; use Authen::Htpasswd; use Plack::Builder; my $app = sub { [200, [

vox がおわるというので tokuhirom.wordpress.com にうつした。 import tool があるので簡単だった。 しかし今後も更新の予定はない。

* Duselongdouble してるときに、double の文字列表現がちがくなるのでテストがこけるという問題があって、それをなおした。 あと、PP 版の pull request がまかまかさ

[ * withoutworldwritables という謎の suffix をつけて CPAN にアップしてる人がいて、だいたいそういうモジュールはクオリティがひくいなあとおもっていたのだけど、こ

[ Perl5.10 なら state がつかえるから、以下のように書けるのではないか。 ``` #!/usr/bin/perl use 5.010; use strict; use warnin

[ 僕はプロのサーバー管理者じゃないけど(いや、うそかも。サーバー管理でお金をもらってたこともなくはないので。でも専業じゃないし)、単に、たとえば、アクセスが集中したときとかに fork(2) が

c9s の [ とかは別に PP でもいいんじゃないの？とおもったので、PP でかいてみた。 ``` #!/usr/bin/perl use strict; use warnings; use F

Text::MicroTemplate の高速化の余地のメモ。 ##### html escape NYTProf をとると、pp\_subst で時間をくっていることは明白です。pp\_subs

``` 書いた人がやりすぎ＋あんまりうまくない、が正解なんじやないかなあ RT @toritori0318: 並べて見るとやっぱperlキモイ / メソッドのフック どう書く？org ``` と

Catalyst と PSGI のくみあわせについてのべている人がおおいが、別に Catalyst をつかっている場合には無理して PSGI/Plack を利用する必要はない。 Catalyst を

``` % time perl -E 'use Moose; say Moose->VERSION' 1.09 perl -E 'use Moose; say Moose->VERSION' 0.2

[ 順調にすすんでいてすばらしいですね。 ``` Make string appending 100 times faster When doing a lot of string append

* 速い * エラーメッセージがとても親切 * 型ベースの自動エスケープ * 複数シンタックス対応 * TTerse という TT2 like なシンタックスをサポートしているので TT からの移行が

[ 自分なら Perl でこう書く。かな。 ``` use perl5i::2; my @x = qw(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

[ これまで Plack には Plack::App::CGIBin というモジュールが付属していたが、これは Perl script の実行しかサポートしていなかった。 しかし、Plack 0

Perlの乱数についてIRCで盛り上がったのでまとめておく。 結論からいうと、srand()はPerl5組み込みのものでよい。乱数の生成はMath::Random::MTがよいとおもう。 Per

勝手に添削なかんじで。 [ をみていておもったのですが、変にがんばるよりも、Test::TCP を直接つかってかいちゃった方が楽なのでは。 ``` use strict; use warnin

srand() をよんだあとでfork(2) を call した場合、子プロセスと親プロセスでおなじシードをもっているために、複数プロセスで生成される乱数がおなじになってしまうということがある。

Sledge のよさのひとつは、非常に枯れているところなのであるが、一方でアクティブなメンテナがおらず、PSGI ブームなどにものっているのかのっていないのかわからないし、テストスイートはたぶん誰もう

perlbrew を利用している場合、用意に -DDEBUGGING つきの perl5 をビルドすることができる(利用していなくても容易にビルド可能だが、より容易となる)。 ``` perlbre