Perl on oinume journal

Perl開発環境としてのEmacsの設定

Sat, 21 Aug 2010 16:08:13 +0900

最近社内でvim勉強会があったりして「vimもいいなぁ」と思っていたのですが、やっぱりキーバインドに慣れなくってEmacsに戻ってきました。最近EmacsでPerl関連の設定を見なおしたので、メモがてら書いておきます。自分がPerlのコードを書くときに使っているelispは以下の5つです。

コマンドラインオプションを解析するPerlモジュールGetopt::Compact

Sat, 10 Apr 2010 12:04:12 +0900

Perlでコマンドラインオプションを解析する場合、大体は標準添付されているGetopt::Longを使うと思いますが、自分は3年前ぐらいから Getopt::Compact というモジュールに出会い、それ以降大抵の場合はこれを使っています。このモジュールの良いところは

DBI->connectのHandleError

Wed, 10 Feb 2010 15:02:28 +0900

DBIのちょっとしたTIPSです。DBIには connect する時に

DBI->connect('dbi:mysql:database=hoge', 'root', 'whatever', { ... });

とオプションを渡すことができます。(たとえば RaiseError) 。このオプションのひとつに HandleError というものがあってデバッグにはなかなか便利なので紹介してみます。端的にいうと HandleError でサブルーチンを登録しておくと、エラーが発生したときにこのサブルーチンを使ってエラーを投げてくれるようになります。以下は具体例。

PerlのDateTimeとTime::Pieceモジュールのベンチマーク

Sat, 05 Dec 2009 15:12:24 +0900

Perlで日付関連の処理をする代表的なモジュールにDateTimeというものがありますが、メモリ消費量が激しいのがずっと気になっていました。でで、Time::Pieceが5.10.1からPerlに標準添付になったという話を聞いて、乗り換えようかどうか検討しています。Perlメモ/Time::Pieceモジュール - Walrus, Digit.を見ると、DateTimeでできることは大体できるので、以下のユースケースでの速度面を測ってみます。

Text::MicroTemplate 0.10で速度が速くなっている件

Sat, 21 Nov 2009 02:11:11 +0900

Now Text::MicroTemplate is even faster than HTML::Template::Pro - use GFx::WebLog;

Text::MicroTemplate 0.10で動作速度が改善されたとのことなので、自分のところでもベンチマークしてみました。

$ perl benchmark_templates.pl 1

Perl/5.10.0 (x86_64-linux-gnu-thread-multi)

HTML::Template/2.9

HTML::Template::Compiled/0.94

Text::MicroTemplateとHTML::Template::Proの比較

Sat, 21 Nov 2009 01:11:04 +0900

PerlでWebアプリを作る時のテンプレートエンジンをどれにしようか相変わらず模索中なのですが、以下の2つのエントリーで動作速度とメモリについて調べた結果、どうやらText::MicroTemplateとHTML::Template::Proのどちらかを選択するのが良いだろうと思っています。

Text::MicroTemplateのメモリ使用量をベンチマーク

Sun, 15 Nov 2009 13:11:31 +0900

Text::MicroTemplateの速度を簡単にベンチマークでText::MicroTemplateの動作速度を簡単にベンチマークしましたが、今回はメモリ使用量を他のテンプレートエンジンと比較してみました。環境はUbuntu 9.04 amd64, Perl 5.10.0 で、GTopを使って測っています。

useした時のメモリ使用量

独自に作ったスクリプト(use_memory_size.pl)でuse時のメモリ使用量を測ってみます。

$ ./use_memory_size.pl

3.2M : use HTML::Template

11.7M : use HTML::Template::Compiled

Text::MicroTemplateの速度を簡単にベンチマーク

Sat, 14 Nov 2009 16:11:34 +0900

2009/11/15 追記：tokuhiromさんのコメントを受けて、Text::MicroTemplate以外のテンプレートファイルにHTMLエスケープの処理を追加してベンチマークを取り直しています。

Perlのテンプレートエンジンでどれを使おうか悩んでいるので、Text::MicroTemplateをはじめとする以下のテンプレートエンジンの速度を簡単にベンチマークしてみました。

Perlで楽天ブックスジャンル検索APIを使う

Wed, 23 Sep 2009 14:09:14 +0900

PerlでAmazon Product Advertising APIのBrowseNodeLookupを行なうの楽天版です。Amazon Product Advertising APIはRESTしかないのですが、楽天ウェブサービスはRESTとJSONに対応しているので、今回はJSONを使ってみます。

PerlでAmazon Product Advertising APIのBrowseNodeLookupを行なう

Tue, 22 Sep 2009 18:09:10 +0900

AmazonのProduct Advertising APIで、あるカテゴリの下にあるカテゴリ(BrowseNode)を取得するPerlスクリプトを書いてみました。最初はNet::Amazonを使っていたのですが、オブジェクトを大量に生成するためかとてつもなく重いのと、返ってくるオブジェクトの構成がよくわからなかったので、自前で処理してみるとさくっとできました。

Perlでパッケージに定義されているメソッドを出力する

Tue, 14 Mar 2006 15:03:52 +0900

Perlであるパッケージに定義されているメソッドを調べたい場合は、シンボルテーブル(%パッケージ名::)をダンプしてやればオッケーなようです。例えばClass::Accessorのシンボルテーブルをダンプするには下記のように書けばOK。