Windows server --- ImageMagick ---   21Jan2008   >>TOP

環境:Windows XP
ImageMagickをインストールすることにより,画像フォーマットの変換が可能になる。また,フォームなどで画像をアップロードした場合,自動でサムネイルを作成して表示する画像サイズを小さくできるのでリスト表示などでは大きなメリットがある。手動で画像編集ソフトを使用する手間が省けるのが良い。

準備:Perlで動作させるにはPerl5.8系が必要になるようなので,まずPerlをインストール。

Perl5.8のインストール
ダウンロードサイト:ActiveState ダウンロードファイル:ActivePerl-5.8.8.822-MSWin32-x86-280952.msi
  1. ダウンロードした ActivePerl-5.8.8.822-MSWin32-x86-280952.msi をダブルクリックし,
    Next をクリック [Fig.1]
  2. I accept the terms in the License Agreement を選択し,Next をクリック [Fig.2]
  3. Browse をクリック [Fig.3]
  4. C:\usr\ に変更し,OK をクリック [Fig.4]
  5. Next をクリック [Fig.5]
  6. Next をクリック [Fig.6]
  7. Install をクリック [Fig.7]
  8. しばらく待つ [Fig.8]
  9. Finish をクリック [Fig.9]


ImageMagickのインストール
ダウンロードサイト:ImageMagick ダウンロードファイル:ImageMagick-6.3.7-10-Q16-windows-dll.exe
  1. ダウンロードした ImageMagick-6.3.7-10-Q16-windows-dll.exe をダブルクリックし,
    Next をクリック [Fig.1]
  2. I accept the agreement を選択し,Next をクリック [Fig.2]
  3. Next をクリック [Fig.3]
  4. C:\imagemagick に変更し,Next をクリック [Fig.4]
  5. Next をクリック [Fig.5]
  6. Install PerlMagick for ActiveState Perl v5.8.8 build 822 をチェックし,Next をクリック [Fig.6]
  7. Install をクリック [Fig.7]
  8. しばらく待つ [Fig.8]
  9. Next をクリック [Fig.9]
  10. Finish をクリック [Fig.10]
  11. PCの再起動が必要なみたい


Perl で動作確認
サンプルソース:
適当な画像イメージsample.jpgをソースと同じ所にアップしてみてください。
#!/usr/bin/perl

use Image::Magick;
$width = 120;

$img = Image::Magick->new;
$img->Read('sample.jpg');
$img = $img->Transform(geometry=>$width);
$img ->Set(quality=>90);
print "Content-type: image/jpeg\n\n";
binmode(STDOUT);

$img ->Write("jpeg:-");
(Linux(fedora)のperlパスに合わせてみた)


PHP で動作確認
サンプルソース:
適当な画像イメージsample.jpgをソースと同じ所にアップしてみてください。
<?

$image="sample.jpg";
$simage="s-sample.jpg";

$cmd = "convert -geometry 100x100 $image $simage";
exec($cmd);

echo "<img src=\"$simage\">";

?>