use Image::Magick; #### my $im = Image::Magik->new();