Perl スクリプトをトレースするには Perl デバッガを使ってもいいですが，全体的な実行フローを追いたい場合 Devel::Trace が使えます。たとえば #!/usr/bin/perl use strict; use warnings; my $i = 0; sub foo { bar(); baz(); } sub bar { baz(); } sub b…

APR（の一部の APR-util）には，各種データベースを統一インタフェースで使うことのできる DBD API があります。のでちょっと使ってみました。ちなみに普通に C でアプリケーションを書いている人にはあまりおすすめできないと思います。統一インタフェース…

UUID と Perl について - daily dayflower でうだうだ書いてたのですが，Pure Perl 実装の UUID generator が欲しくなったので書いてみました（各種 UUID モジュールのインタフェースを共通化するモジュールはまだ書いていません）。CodeRepos に置いてあり…

UUID がどういうものであるか，とか UUID の表現形については省略します。 UUID - Wikipedia が参考になるかと。UUID の仕様として RFC 4122 を参照しました*1。なのでより細かいことについては原文を参照してください。策定されるまでにいろいろ経緯がある…

はてブのクライアントサイドでの処理時間を示すことのできる #benchmark ハッシュなんて話もありましたが（→2009-01-21 - 聴く耳を持たない(片方しか)），サーバサイドでどれくらい処理時間がかかったか（を反映していると思われる）示すレスポンスヘッダを…

use strict; use warnings; sub Dump { @_ = map { sprintf "'%s'(%s)", $_, utf8::is_utf8($_) ? 'utf8' : 'bytes' } @_; print {*STDERR} join(q{, }, @_), "\n"; } no utf8; Dump( foo => 'bar' ); #=> 'foo'(bytes), 'bar'(bytes) no utf8; だもんで，両…

テストが膨大になっていくと，あるテストでは時間がかかったりして「そのテストはもう成功することがわかっとるっちゅうねん；失敗するテストだけ再テストしたいっちゅうねん」ってことになったりします。そんなときに使えるのが prove コマンドの --state …

こんにちは！ みなさんガジェットつくってますか！ なんだか最近、色々な種類があるみたいですね！（以下略！）そしたら意外と簡単だった…！ これならぼくにも作れそう！！ってことで、ちょっとメモしておきますね！ どれにしようかな…！ おもしろいこと Ubu…

DRBD のディスク上に LVM を構築しようとしたらちとはまりました。うーん困った，とおもってググったら，解決してる先達がいらっしゃいました→DRBD-8.0.X + LVM2 - end_of_scriptの日記。元記事では生ディスク /dev/sda3 の上に DRBD を構築して（さらにその…

VMware ESXi で各種ディスクのベンチマークをとってみた - daily dayflower の動機とか思索とかメモメモ。 iSCSI や NFS によってディスクを外在化させれば，DRBD や LVM を活用して堅牢な VM image store とすることができる local disk だとサポートされて…

ESXi でネットワーク Disk 上に VM を構築するにはいくつかの手段があるのですが，それらの速度を測定してみました。 おことわり おもに下記の命題を検証するために測定を行いました。 NFS data store でも iSCSI data store / raw disk と比べて遜色ない（…