画像を「上下」「左右」同時に反転させる - Perl,ImageMagick

この記事は2007年02月23日に書かれたものです。

ImageMagickを使用し、画像を「上下」「左右」同時に反対にしたい。FlipメソッドとFlopメソッドを同時(順番)に使用すれば良い。ImageMagickは非常に柔軟にコードを書くことができる。

befor after

サンプル

#!/usr/bin/perl
 
;#
;#画像を「上下」「左右」同時に反転する
;#
 
use Image::Magick;
 
#-------------------------------------------#
#初期設定
#-------------------------------------------#
#-- 元画像 --#
my $source = './sample_org1.jpg';
 
 
#-------------------------------------------#
#上下、左右を同時に逆にする
#-------------------------------------------#
#-- インスタンス生成 --#
my $image = Image::Magick->new;
 
#-- 画像を読込む --#
$image->Read($source);
 
#-- 上下反転 --#
$image->Flip;
 
#-- 左右反転 --#
$image->Flop;
 
#-- 画像を保存する(JPEG) --#
$image->Write("./image_flipflop.jpg");

ちょっと大きめの実行結果です。

ちなみに、上はFlip,Flopの順番で使用していますが、逆にFlop,Flipとしても結果は変わりません。プログラム関係なく、普通に頭の中でイメージした通りに変換してくれます。

Flip,Flopはもちろん個別に使用することができます。左右に反転するのは「Flop」、上下に反転するのは「Flip」です。

関連書籍

クーガー株式会社, 石井 敦
ISBN 4844326473
¥ 10,970

昌達 慶仁
ISBN 4797344377
¥ 28,746

failed to fetch data: unkown error

failed to fetch data: unkown error

Joseph N. Hall, Joshua…
ISBN 4798139815
¥ 4,104

コメント

コメントを入力. Wiki文法が有効です:
Q T R C Y