大げさなタイトルだけれども、最近の思うところを。 引数に関して ウィッシュリストを返すルーチンwishを作ったとする。 package Foo; sub wish { my ($person, @wish_list) = @_; return "$person wants " . join(',', @wish_list) . ".\n"; } 1; これに対…

Test::Moreのis(), ok()だけで終わらせていたらもったいない！ ってことでいろいろ使ってみる。 Test::Moreをもう一歩踏み込んで使う is_deeply 構造レベルまでチェックしたい時に使う。 my $ref_hash; $ref_hash->{key} = 'val'; is_deeply($ref_hash, {key…

Cacheの実装として、ローカルのファイルシステムを使うもの。使ってみての所感をまとめたい。 導入により享受できる恩恵 当然ながら、DBへの負荷を減らせる ファイルなので複数プロセスで共有可能 ローカルにあるのでネットワークトラフィック発生しない 注…