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