$x = $p->Crop(geometry=>'439x4+166+167');
warn "$x" if "$x";
$x = $p->Trim();
warn "$x" if "$x";

print join ",",$p->Get(qw/columns rows page/);

##</code><code>##

Exception 310: geometry does not contain image `216.PNG' @ warning/attribute.c/GetImageBoundingBox/239 at /tmp/tst_im.pl line 36.
1,1,1238x1688-1-1