как вырезать кусок из картинки с помощью Perl::Magick?

Есть объект $image1 типа Image::Magick
Суть задачи получить новый объект $image2 типа Image::Magick содержащий в себе часть картинки вырезанной из $image1.При этом $image1 должен остаться не измененным. И не должно быть лишних обращений к диску.

То есть вариант когда мы в $image2 грузим тоже изображение что и в $image1 а затем кропаем его не подходит.

Ответ искал тут но с английским тяжеловато. Заранее благодарю за помощь.