Imager を使ってサムネール作成

突然ですが、500枚以上のJpegファイルのサムネールを作成しなければならなくなりました。

そこで、複数の画像ファイルを一括で変換してくれるツールをいろいろ探してみました。ベクターのWindows用画像変換ツールページを見ると、そらもーサムネール作成に特化したツールが山のようにあり、中でも「縮小専用」というものがわりかしメジャーで設定が少なく急ぎの用途にぱっと使うには適してるようです。

ですが、その縮小専用も含め自分が試してみたフリーソフトの全部が元画像の縦横比を維持したまま、四角いサムネールを作ることが出来ないのですね。

図で表現するとこんなかんじ↓

数時間、いろんなそふとをあーでもないこーでもないと試した挙句、出来ないなら自作してやれ。とまで思いつめて、ActivePerl + Imager でサムネール作成用のスクリプト作りました。

以下ソース。