ステートメント有料サービスシェアウェアパートナー(代理店)契約パートナー専用オーダーメイドCGIFAQお問い合わせこのページを印刷ImageMagic(PerlMagic)このコーナーは、ホームサーバ、自社サーバならではのグラフィックライブラリ、ImageMagickのインストールと、利用法をご紹介します。アップロードされた画像をすべてJPEG形式のサムネイルでコピーする事も可能にします。ImageMagickを使用すればこんなグラフも動的に作成できてしまいます。本章ではWindowsのホームサーバを構築する事を目的としていますのでWindowsのインストールを解説します。言ってもWindowsの場合は、解説するまでもありません。5分もあれば終わってしまいます。ImageMagicを使用した高度なサンプルはこちらに有ります。※ImageMagickはPerlを拡張する必要がありますので、プロバイダや、レンタルサーバにご自分でインストールすることはできません。ImageMagickのインストールCommand.comの起動[スタート]メニューの「ファイル名を指定して実行」で、commandとタイプしてDOSシェルを起動します。コマンドを起動します。インストールしてください。これでインストールは完了です。あとは実際にインターフェースを作成してアクセスするだけです。ImageMagickを使ってみるインストールが終了すれば、perlからライブラリを操作して動的に画像を生成したり、編集できます。UNIXでもLinuxでも動作します。次のサンプル画像は、450×356ピクセル、107KBのGIF画像です。サムネイルされた画像を生成サンプル画像を出来るだけ解像度を落とさずにそのまま縮小しています。Flyと比べても非常に奇麗に生成されます。image/gif\n\n";binmode(STDOUT);$i->Write("gif:-");exit;このサンプルで生成されたGIF画像は約14KBです。上記スクリプトとほとんど同じですが、ファイルに書き出す$i->Write('jpeg:-');の行だけが違っています。jpegを指定する事で出力時にフォーマットを変換しています。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;ここで生成されたjpeg画像はわずか4KBしか有りません。著作権にうるさいGIFをJPEGに変換して、さらにサイズまで1/3にしてくれるのですからGIFは使いづらくなります。同様に「PNG:」を指定するとPNG形式に変換する事もできます。次の例では縦横比を無視し、指定した大きさで生成しています。複数の画像を合成してサムネイルされた1枚の画像を生成する場合などに有効です。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;画像をぼかすここからは、さまざまなフィルターや効果を紹介します。Blurは、指定したfactor値(0-99.9)で画像をぼかします。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;枠の追加Width、heightは、枠の幅と高さで、innerとouterは、立体表示させる幅と高さをピクセルで指定します。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;ねじり効果factorには、ねじり強度を%で指定します。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;色反転$i->Negate()で全ての色を反転し、オプションでグレイスケールだけを反転させる事もできます。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;画像の回転degreesで指定された角度で画像を回転します。degreesは、-360から360までの整数で、マイナスは左回りを指します。cropに1を指定すると、元の画像の大きさを変えません。sharpenに1を指定すると、同時にシャープフィルタを付加します。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;影を付ける画像に影を付けます。image/gif\n\n";binmode(STDOUT);$i->Write("jpeg:-");exit;ウェーブ効果ウェーブ効果は、拡大しておかなければなりませんので、$i->Magnify();で縦横共に2倍に拡大しています。