2006/10/16 - memo - unknownplace.orgrun { my $block = shift; is(process($block->foo), $block->bar, $block->name); }; って引数に関数渡せる。 これは perldoc perlsub の Prototypes の項目に載ってる An "&" requires an anonymous subroutine, which, if passed as the first argument, does not require the "sub" keyword or a subsequent comma. プロトタイプで & を第一引数に指定した場合その無名関数には sub つけなくても良い。 これは割と使えそうだ。 たとえば、STDERRとかになんか出力しちゃううざいモジュールを使ってtestを書いているときに sub execute(&) { my
