Image::Magickの利用方法
use Image::Magick;
$tempimage = Image::Magick->new();
$tempimage->Read("読み込み画像");
$tempimage = $tempimage->Transform(geometry=>150);
$tempimage->Write("書き出し画像");
画像を横幅150pxに圧縮して書き出す。
書き出し画像の拡張子に合わせて出力してくれるとのことでGDより便利。
perlで初めて便利と感じた。

コメントする