enclose a shape with a rectangle

[gubach]

I have a white shape over a black background and I want the coordinates of the two points that define the smallest rectangle that encloses the given shape. To get those values I have to compute the distance from the left boarder to the shape and from the top boarder to the shape. Has someone PerlMagick code for this? Thank you very much!

[snibgo]

I don't know Perl. From the command line, you can get the rectangle's width and height, and top-left corner, from:

Code: Select all

convert in.png -format %@ info:

[gubach]

I don't know Perl. From the command line, you can get the rectangle's width and height, and top-left corner, from:

Code: Select all

convert in.png -format %@ info:

thank you!! This helps for now!

[gubach]

PerlMagick for

Code: Select all

 convert in.png -format %@ info: 

is

Code: Select all

 $geometry = $in_png->Get('bounding-box'); 

[snibgo]

Thanks for posting the answer.