my $picture = Image::Magick->new(); $picture->ReadImage("$image_filename"); my $copy = $picture->Clone();