Perl

IPC::Open3 を使って、子プロセスの標準出力と標準エラー出力をポーリングする。(Windows でも動くよ!)

先日の IPC::Open3 を使って、子プロセスの標準出力と標準エラー出力をポーリングする。(Windows では動かなかった…) - ◆F99a.q8oVEの日記 は Windows では動きませんでした。Windows のルートでは # $dad_wtr は open3 の第2引数 # open3(undef, '>&'. file…

IPC::Open3 を使って、子プロセスの標準出力と標準エラー出力をポーリングする。(Windows では動かなかった…)

Windowsでも動く続編を書いたので、そちらを参照ください。 IPC::Open3 を使って、子プロセスの標準出力と標準エラー出力をポーリングする。(Windows でも動くよ!) - ◆F99a.q8oVEの日記 もしかして、win32上のperlでデッドロックせずにSTDIN, STDERRをポーリ…

perl 5.8.8 の core module だけで Comet server 書いてみた

早速ちゃんと作り直したい。 f99aq8ove/Comet-chat-sample · GitHub

twitter sample stream に JSON 以外のデータが混ざって送られてきてる気がする

AnyEvent::Twitter::Stream 0.20 を使って、sample stream を拾って遊んでいるんですが、2011-01-10 辺りから何やらエラーが出るようになってしまっていました。細かく見ると、どうやら Twitter 側から流れてくるデータに、JSON じゃないものが混ざってしま…

ARGV memo

ARGVの挙動をいつも忘れちゃうので、メモ。多量(ってほど多く無かったけど)のファイルの改行コードがCR, LFか、LFかを判別する必要があったんで、適当に書いた。ARGV便利。$.の所の条件が逆だったので修正 (´・ω・`) #!/usr/local/bin/perl use strict; use …

今日追加した alias

alias yaml2json="perl -MYAML -MJSON -e 'print objToJson(YAML::Load(join \"\",<STDIN>)).\"\\n\"'" alias json2yaml="perl -MYAML -MYAML::Dumper -MJSON -e '\$d=YAML::Dumper->new;\$d->indent_width(2);print \$d->dump(jsonToObj(join \"\",<STDIN>))'"絶対もっと</stdin></stdin>…

SVN::Web install log

SVN::Webいいねコレ - HAKOBE blog ♨ という記事に触発されて、入れてみた。 cpan でさくっと入れようとしたら、そもそも perl が古いという驚愕の事実に気付きアップデート cpan で install SVN::Web を試みるも SVN::Core を手動で入れろといわれる SVN::C…