画像の入力・出力 基本となる画像の読み書きです。Read()で指定した画像を読み込み、Write()で画像を書き出します。 #!/usr/local/bin/perl -w use strict; use Image::Magick; # 画像を指定 my $file = "sample.jpg"; # オブジェクト作成 my $image = Image::Magick->new; # 画像読み込み $image->Read($file); # 画像処理 $image->Emboss(radius=>2, sigma=>1); # 画像出力 $image->Write("output.jpg"); undef $image; exit; このスクリプトを実行すると、output.jpgが同じ階層に出力されるはずです。またWrite()に与えるファイル名の拡張子は自由に変更できます。例えば