Perl Magickのファイルサイズにそって圧縮

PerlMagickで、Jpegを扱おうと思っております。
スクリプトは、訪問者が投稿した画像を待ちうけ画面に加工してかえすものにしようと思っています。

qualityを使用して圧縮したいと思っています。
その際、投稿された20KB以上の画像を、ぎりぎり20KB未満で保存したいのですが、画像によってファイルサイズも色数も異なるので圧縮率を固定できません。

画像に合わせて自動で圧縮率を設定する方法はありますでしょうか？よろしくお願いします。

No.1 ベストアンサー 回答者： zebedeer 回答日時： 2004/09/02 00:53

>画像に合わせて自動で圧縮率を設定する方法はありますでしょうか？

大抵の圧縮方法は、圧縮前に圧縮後の大きさを知ることができません。
（圧縮してみないと分からない）
jpegも画像圧縮なので、圧縮前に圧縮後の大きさを知ることはできないと思います。