The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

slant_text.pl - sample for drawing transformed text

SYNOPSIS

  perl slant_text.pl [options] fontfile output text

  Run without arguments for option details.

DESCRIPTION

This is a sample for drawing transformed text.

It's complicated by the need to create an image to put the text into, if you have text, a font, and a good idea where it belongs, it's simple to create the transformation matrix:

  use Imager::Matrix2d;
  # or call another method for shearing, etc
  my $matrix = Imager::Matrix2d->rotate(radians=>$some_angle);

Feed the transformation matrix to the font:

  $font->transform(matrix=>$font);

then draw the text as normal:

  $image->string(string=>$some_text,
                 x => $where_x,
                 y => $where_y,
                 font => $font,
                 size => $size);

But if you do need the bounds, the code above does show you how to do it.

FUNCTIONS

transformed_bounds

Returns a list of bounds:

  (minx, miny, maxx, maxy)

These are offsets from the text's starting point in font co-ordinates - so positive y is up.

Note: this returns the bounds of the transformed bounding box, in most cases the actual text will not be touching these boundaries.

AUTHOR

Tony Cook <tonyc@cpan.org>

REVISION

$Revision$

SEE ALSO

Imager(1), Imager::Cookbook, Imager::Matrix2d