GIFからコメントを取得するには

質問

GIF画像にウェブアニメーターやPhotoShop等で画像にコメントを埋め込むことができるようですが、それをperlで取得するにはどうしたらよいでしょうか？

回答No.1

leaz024 · ベストアンサー

インストールが必要ですが、Image::Info モジュールを使うと簡単にできます。

use Image::Info qw/image_info/;

my $info = image_info("foo.gif");
print $info->{Comment}, "\n";

$info には他にも幅や高さ、透過色インデックスなど様々な情報が入ります。詳しくはCPANでどうぞ。
http://search.cpan.org/
http://search.cpan.org/~gaas/Image-Info-1.16/lib/Image/Info.pm

参考URL：

http://search.cpan.org/~gaas/Image-Info-1.16/lib/Image/Info.pm

お礼

遅れてすみません。
インストールに戸惑ってしまいましたが、無事うまくいきました。
ありがとうございました。