使用GD库裁剪图像

Question

我在Perl脚本中使用GD库，允许我绘制真正的字体文本。因为我在开始时不知道确切的大小，所以我设置了

my $i = new GD::Image(3000, 3000);

然后我画了我的文字

my $black = $i->colorAllocate(0, 0, 0);
my @b = $i->stringFT($black, './ttf/cour.ttf', 12, 0, 0, 0, "\n$text");

其中@b包含我的裁剪数据。

我希望执行类似这样的操作（语法不正确）：

$i->crop(0, 0, $b[2], $b[3]);

...但是没有这样的crop功能。

如何裁剪图像？有一些已知的解决方法吗？

Answer 1

通常，您可以使用the "copy" methods of GD将所选数据从一个图像移动到新图像中。

或者如果你真正需要的只是计算用GD绘制的字符串的宽度和高度，请查看GD::Text。