2011-05-01から1ヶ月間の記事一覧

AnyEventの練習

噂のsleepsort書いてみた。AnyEvent->timer の戻り値捨てると動かないんだなぁとか。 #!/usr/bin/env perl use strict; use warnings; use Data::Dumper; use AnyEvent; sub sleepsort { my (@args) = @_; my $cv = AnyEvent->condvar; my (@sorted, @timers…

Perlのsystem()に@_を渡せなくてハマった。と思ったら単純ミス。

背景 コマンドラインで動くPerlのプログラムをTDDで作ろうと思い、同じくコマンドラインプログラムであるApp::cpanminusのテストの書き方を真似して書いていた。 問題 でもユーティリティ関数で呼んでいるsystem()に引数が渡らない!なぜ!><単純化すると…

memcached

You can enable memcached to automatically load on login with: mkdir -p ~/Library/LaunchAgents cp /usr/local/Cellar/memcached/1.4.5/com.danga.memcached.plist ~/Library/LaunchAgents/ launchctl load -w ~/Library/LaunchAgents/com.danga.memcach…

[perl][memo] Task::BeLike::*

Task::BeLike::BINGOS Task::BeLike::RJBS Task::BeLike::FLORA Task::BeLike::Tokuhirom http://www.youtube.com/watch?v=FYyxBJrluFk