Skip to content

Instantly share code, notes, and snippets.

@usualoma
Created September 9, 2009 07:51
Show Gist options
  • Save usualoma/183561 to your computer and use it in GitHub Desktop.
Save usualoma/183561 to your computer and use it in GitHub Desktop.
% ls -l test.jpg
-rw-r--r-- 1 taku taku 30861 9月 9 16:39 test.jpg
% rpm -qa | grep -i 'png\|jpe\?g\|magick'
libpng-devel-1.2.10-7.1.el5_3.2
ImageMagick-perl-6.2.8.0-4.el5_1.1
libjpeg-6b-37
ImageMagick-6.2.8.0-4.el5_1.1
libpng-1.2.10-7.1.el5_3.2
% perl -MImage::Magick -e '$m = Image::Magick->new; $m->Read("test.jpg"); $m->Resize('width' => 10, 'height' => 10); open($fh, ">", "resized.jpg"); print($fh $m->ImageToBlob);'
% ls -l resized.jpg
-rw-r--r-- 1 taku taku 412 9月 9 16:51 resized.jpg
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment