アバターのレンダリングとかにつかうライブラリについてなど
http://github.com/tokuhirom/avatar-benchmark
Perl5 において有名な画像処理ライブラリといえば GraphicsMaick, ImageMagick, Imager, Imlib2, GD あたりだとおもうのだが、はたしてアバターのレンダリングなどにつかう場合にはどれが適しているのかについてしらべてみた。
コードはこんなかんじでしょう。
package AB;
use strict;
use warnings;
use autodie;
use Imager;
use GD;
use Image::Imlib2;
use Graphics::Magick;
sub render_imager {
my $img = Imager->new();
my $base = $img->read(file => 'img/base.gif') or die;
for my $i (reverse 1..7) {
my $part = Imager->new();
$part->read(file => "img/s$i.gif") or die;
$base->rubthrough(src => $part, tx => 0, ty => 0) or die;
}
$base->write(file => 'out/imager.jpg', jpegquality => 90) or die;
}
sub render_gd {
my $base = GD::Image->new('img/base.gif');
for my $i (reverse 1..7) {
my $part = GD::Image->new("img/s$i.gif");
$base->copy($part, 0,0, 0,0, $base->width, $base->height);
}
# save
my $jpeg = $base->jpeg(90);
open my $fh, '>', 'out/gd.jpg';
print {$fh} $jpeg;
close $fh;
}
sub render_imlib2 {
my $base = Image::Imlib2->load("img/base.gif");
for my $i (reverse 1..7) {
my $part = Image::Imlib2->load("img/s$i.gif");
$base->blend($part, 0, 0,0,$base->width, $base->height, 0,0,$base->width, $base->height);
}
$base->set_quality(90);
$base->image_set_format('jpeg');
$base->save('out/imlib2.jpg');
}
sub render_gm {
my $base = new Graphics::Magick;
$base->Read("img/base.gif");
for my $i (reverse 1..7) {
my $part = Graphics::Magick->new();
$part->Read("img/s$i.gif");
$base->Composite(image => $part, compose => 'over', x => 0, y => 0);
}
$base->Set(quality => 90);
$base->Write('out/gm.jpg');
}
1;
結果はこんなかんじでしょう。
## SC440 linux, PenD 3GHz, 8GB memory
Benchmark: timing 1000 iterations of gd, gm, imager, imlib2...
gd: 23 wallclock secs (22.84 usr + 0.35 sys = 23.19 CPU) @ 43.12/s (n=1000)
gm: 39 wallclock secs (74.32 usr + 1.29 sys = 75.61 CPU) @ 13.23/s (n=1000)
imager: 31 wallclock secs (31.32 usr + 0.33 sys = 31.65 CPU) @ 31.60/s (n=1000)
imlib2: 12 wallclock secs (10.88 usr + 0.62 sys = 11.50 CPU) @ 86.96/s (n=1000)
やはり Imlib2 が高速なので、Imlib2 をつかうのがよさそうだ。
(ImageMagick はドキュメントが pod になってない、インターフェイスがつかいづらい、遅い、の3重苦なのでもはやつかう理由がみあたらない)
Published: 2010-09-12(Sun) 03:38